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APPENDIX A 



FIGS. Al, A2 and A3 show possible implementations for the low-pass filter 
(L p ) and the high-pass filter (H P ) cut-off filters. The order of these particular filters is 
kept small to support a low-MIPS implementation. FIG. A4 shows a possible 
implementation for the high and low shelving equalizers. These equalizers are used 
for L s and H s . FIG. A5 shows a parametric equalizer implementation usable for boost 
or cut applications. Combinations of such equalizers can be combined, as shown in 
FIGS. A6 and A7, to build the compensated notch effect. 
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APPENDIX B 



Figure Bl is a block diagram of a compensation system used to compensate 
a small bookshelf speaker having a 5-inch bass driver and 3-inch tweeter. The speaker 
is characterized as follows: 

Woofer: dome = 4.33 k (notch with LC) 

cone = 4.9 k (compensated notch only) 
edge of cone = 2.8 k (active notch) 

Tweeter: dome = 1 5 . 1 k (no compensation) 



Fourteen adjustments are provided. FIG. B2 shows circuits used to create L x> 
H x , L s , H s , L P , and H P filters and parameters adjustments. A lower frequency cutoff 
peak was added to create response character of an 8 inch bookshelf system. For this 
circuit, Q and peaking amplitude are set by the components marked by square boxes. 
FIGS. B3 and B4 show W 0 notch sections and representative tuning for the speaker. 
W 0 . . . and |A| in dB are adjustable, while a resistor set Q. Two groups of these make 
four adjustments. FIG. B5 shows a single low-Q boost. Adjustments for boost and 
frequency are provided by the op amp section. FIG. B6 is an all-pass equalizer used 
for time correction. The all-pass equalizer combines outputs from the six active 
process circuits. 



cone cr = 1 1 .6 k (active notch) 

cone cr = 9.32 k / 9.45 k (damp compound) 

W 0 = 1.38 k (LCR notch) 
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APPENDIX C 

A computer adjusted DSP compensator was implemented using a standard PC 
and a Motorola EVM56362 DSP evaluation board. Source code and application notes 
follow. 
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Speaker Tuning Application Note 

The speaker tuning application is written as a Windows OS 32-bit application using the 
object-oriented MFC application framework (please refer to the documentation of MFC 
that is included with Microsoft Visual C++ development environment). The application 
has a dialog interface. The main dialog class, CTabDialog, is a subclass of the MFC 
CDialog class. The CTabDialog class implements a "tabbed" dialog interface Each tab 
in the dialog is a subclass of the MFC CPropertyPage class. Each tab represents different 
aspects of the speaker correction algorithm. The following is a list of tab classes: 

• CMainPage which implements UI for pre and post volume controls amongst other 
things 

• CShelvPage which implements UI controls for low and high shelving equalization 
filters 

• CCutoffPage which implements UI controls for low and high peaking cutoff 
filters 

• CNotchPagel and CNotchPage2 which implements UI controls, for a number of 
notch filters (to for example limit resonance in the speaker) ■ 

o CStWaveRejectPage which implements UI controls for a set of filters which can 
limit standing waves in the speaker cabinet 
. • CDBNotch which implements UI controls for a*double-tuned notch filter 

• CAllpassPage which implements UI for a 2 nd -order allpass filter 

Each adjustable parameter on a tab page is represented by an instance of the CSlider 
class. Each UI slider has a range of 4096 discrete values. When a user manipulates a UI 
slider a message is sent from the tab page to an instance of the CDSP56Manager class In 
this class, the appropriate calculation takes place to transform the linear input value into 
one or more values necessary to compute the transfer function represented by the user 
settings. These computed values are transmitted to the DSP using an I2C serial 
connection. The DSP executes the calculations necessary, for the real-time 
implementation of the above-mentioned transfer function. The DSP is capable of 
computing a series of filter calculations in real-time to allow the total cascaded transfer 
function of all the speaker correction .filters to be realized. The DSP can receive analog 
or digital input data and transmit processed analog or digital output data. 
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1 Speaker P^meter File Input And UulpMtogic 



The tab dialog object instance receives 
messages (from the Windows OS) in 
response to user action in the 
application menus 





CTabDialog 


V^m_AIdx 

V ^ m_AIlpassPage 

$2 m_CutoffPage 

9^m_DBNotch 

9>rn_DDXPage 


| o 


^CTabDialogO 
$DisplayI2CState() 
9§Displa>Mode() 
90 DoDataExchangeO 
9§OnCloseO 









The user "open" or "save" 
request results in function 
calls to member functions of 
the CDSP56kManager. 
These calls can restore or 
return the state of all DSP 
parameters. 



CDSP56kManager 
^ # m__Comra 
gymJDSPRetum 
^raJDSPVals 
^m_Raw2DSPVals 
j,^m_RawVals 

^ CDSP56kManagerO 
f& ChecksumSRECO 
rfo OmvertBoostCutRangeO 
jfe ConvertFreqRangeO 
{^CaavertQRangeO 
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I Example of (^froperty Page UI to DSP coWgction logic 



The property pages of the 

TabDialog receive 
mapped messages (from 

the Windows OS) in 
response to user actions 





CStWaveRcjPage 


§ CStWaveRejPageO 
9$ DoDataExchangeO 
9§OnBypassO 

9QOnInitDialogO 
9§OnPaintO 
9§ OnShowWindowO 
9§OnVScroI10 
9$SendStringToUI0 
$ -CStWaveRejPageO 
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KCIPortComm 

^m_HWnd 
:^m_TxReq 
^im_detect 
_£ $ m_error_code 
£<?m_getJkAcct „ 

^CheckStateO 
^GetDetectStateO 
QI2CIPortCommO 
§ IsTransmittmgO 
^MessageHandlerO w 



Parameter changes causes the 
property pages to call 
member functions of 
CDSP56kManager 



CDSP56kManager 



.^m_Comin 

V^mJDSPRetum 

v>m_DSPVals 

£ j m_Raw2DSPVals 

j^m_RawVals 



§ CDSP56kManagerO 
j& ChecksumSRECO 

ConveitBoostCutRangeO 
rfe ConvertFreqRangeO 

CqnvertQRangeQ 



A parameter change causes new 
DSP values to be calculated and 
sent to the DSP via an I2C 
connection 




// COMPortChooser.cpp :'^^ementation file 

#include "stdafx.h" 

tfinclude "sa.h" 

ffinclude "COMPortChooser .h" 

ffifdef _DEBUG 
#define new DEBUG_NEW 
Sundef THIS_FILE 

static char THIS_FILE[] = FILE 
#endif ' 

/^Po^ 

CCOMPortChooser: : CCOMPortChooser (CWnd* pParent /*=NULL*/) 
^ : CDialog (CCOMPortChooser: : IDD, pParent) 

//{ {AFX_DATA_INIT (CCOMPortChooser) 

// NOTE: the ClassWizard will add member initialization here 
//} } AFX_DATA_INIT 



void CCOMPortChooser: :DoDataExchange (CDataExchange* pDX) 

CDialog: :DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CCOMPortChooser) 

// NOTE: the ClassWizard will add DDX and DDVcalls here 
//}}AFX_DATA MAP 

} 



BEGIN_MESSAGE_MAP (CCOMPortChooser, CDialog) 
/ / { { AFX_MSG_MAP (CCOMPortChooser) 
ON_BN_CLICKED(IDC_RADI01, OnRadiol) 
ON_BN_CLICKED(IDC_RADI02, 0nRadio2) 
ON_BN_CLICKED ( IDC_RADI03 , 0nRadio3 ) 
ON_BN_CLICKED(IDC_RADI04, 0nRadio4) 
//}}AFX_MSG_MAP 

END_MESSAGE MAP ( ) 




void CCOMPortChooser: : OnRadiol ()' 

//TODO: Add your control notification handler code here 
which_port = 1; 

) 

void CCOMPortChooser: :0nRadio2 () 

//TODO: Add your control notification handler code here 
which_port = 2; 

} 

void CCOMPortChooser: :OnRadio3 () 

//TODO: Add your control notification handler code here 
which_port = 3; 



void CCOMPortChooser :: 0nRadio4 ( ) 

//TODO: Add your control notification handler code here 
which_port = 4; 



l 



} 




BOOL CCOMPortChooser: : OnlnitDialog ( ) 
CDialog: : OnlnitDialog ( ) ; 

// TODO: Add extra initialization here 
which_port = 3 ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION : OCX Property Pages should return FALSE 
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// Cutoff Page. cpp : impi^^ptaGion file 
// 

8 include "stdafx.h" 
Sinclude "sa.h" 
Sinclude "Cutoff Page .h" 
Sinclude "DSP56kManager .h" 

(fifdef _DEBUG 
((define new DEBUG_NEW 
ffundef THIS_FILE 

static char THIS_FILE[] = FILE ;' 

#endif 

ItlllllllllUlllllilllllllllllllllllllltlllll/lllllllllllllll/lllllllllllllll 
I / CCutoffPage property page 

IMPLEMENT_DYNCREATE (CCutof f Page, CPropertyPage) 

CCutoffPage: : CCutoffPage { ) : CPropertyPage (CCutof f Page :: IDD) 

// { {AFX_DATA_INIT (CCutoffPage) 
//} }AFX_DATA_INIT 

} - 

CCutoffPage: : -CCutoffPage () 

{ 

} 

void CCutoffPage: : DoDataExchange (CDataExchange* pDX) 

CPropertyPage: : DoDataExchange (pDX) ; 
' //{ {AFX_DATA_MAP (CCutof f Page) 
DDX_Control (pDX, IDC_CHECKS, m_BypassSecondButton) ; 
DDX_Control (pDX, IDCJ2HECK5 , ,m_BypassFirstButton) ; 
DDX_Control (pDX, IDC_SLIDER6, m_HiBoostSlider) ; 
DDX_Control (pDX, IDC_SLIDER5, ra_HiQSlider) ; 
DDX^Control (pDX, IDC_SLIDER4, m_HiFreqSlider) ; 
DDX_Control (pDX, IDC_SLIDER3, m_LoBoostSlider) ; 
DDX_Control (pDX, IDC_SLIDER2, m_LoQSlider) ; 
DDX_Control (pDX, IDC_SLIDER1, m_LoFreqSlider) ; 
/ / } } AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CCutof f Page, CPropertyPage) 
//{ {AFX_MSG_MAP (CCutoffPage) 
ON_WM_VSCROLL ( ) 

ON_BN_CLICKED (IDC_CHECK5, OnBypassFirst) 
ON_BN_CLICKED(IDC_CHECK6, OnBypassSecond) 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
// CCutoffPage message handlers 

BOOL CCutoffPage: : OnlnitDialog ( ) 
{ 

CPropertyPage: : OnlnitDialog ( ) ; 

// TODO: Add extra initialization here 
mJLoFreqSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_LoFreqSlider.SetPos(C0NTR0L_RANGE-g_DSPManager->GetParamValue(kNotch6Freq) ) ; 
m_LoFreqSlider.SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_LoQSlider . SetRange ( 0 , CONTROL_RANGE) ; 

m_LoQSlider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch6Q) ) ,- 
m_LoQSlider . SetTicFreq ( (C0NTR0L_RANGE+1) /16) ; 
m_LoBoostSlider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_LoBoostSlider . SetPos ( CONTROL_RANGE - g_DS PManager - >GetPararaValue (kNotchSBoost ) ) 
m_LoBoostSlider. SetTicFreq ( (C0NTROL_RANGE+l) /16) ; 
m_HiFreqSlider . SetRange ( 0 , C0NTR0L_RANGE) ; 

m_HiFreqSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch7Freq) ) ; 



1 



m_HiFreqSlider . SetTicF^^B(cONTROL_RANGE+l) /16) ; 
m_HiQSlider. SetRange (0^ONTROL_RANGE) ; 
m_HiQSlider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue CkNotch7Q) ) ; 
m_HiQSlider . SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_HiBoostSlider . SetRange (0 , CONTROL_RANGE ) ; 

m_HiBoostSlider. SetPos <CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotch7Boost ) ) ; 
m_HiBoostSlider .SetTicFreq( (CONTROL_RANGE+l) /16) ; 

// g_DSPManager->SetCutof flFreq(CONTROL_RANGE-m_LoFreqSlider. GetPos () ) ; 

// g_DSPManager->SetCutoEflQ(CONTROL_RANGE-m_LoQSlider .GetPos () ) ; 

// g_DSPManager->SetCutoff lBoost (CONTROL_RANGE-m_LoBoostSlider .GetPos () ) ; 

// g_DSPManager->SetCutoff2Freq{C0NTR0L_RANGE-m_HiFreqSlider. GetPos () ) ; 

// g_DSPManager->SetCutoff2Q(CONTROL_RANGE-m_HiQSlider . GetPos () ) ; 

// g_DSPManager->SetCutoff2Boost(CONTROL_RANGE-m_HiBoostSlider.GetPos() ) ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

} 

void CCutoff Page : :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
{ 

// T0D0-. Add your message handler code here and/or call default 
CPropertyPage : :OnVScroll (nSBCode, nPos, pScrollBar) ; 
Sleep(50) ,- 

if( (CSliderCtrl *) pScrollBar == &m_LoFreqSlider ) 

g_DSPManager->SetCutof f lFreq(CONTROL_RANGE-m_LoFreqSlider . GetPos 0 ) ; 
else if ( (CSliderCtrl *) pScrollBar == &m_LoQSlider ) 

g_DSPManager->SetCutofflQ(CONTROL_RANGE-m_LoQSlider.GetPos() ) ; 
else if ( (CSliderCtrl *) pScrollBar == &m_LoBoostSlider ) 

g_DSPManager->SetCutof f lBoost (CONTROL_RANGE-m_LoBoostSlider .GetPos ( ) ) ; 
else if( (CSliderCtrl *) pScrollBar == &m_HiFreqSlider ) 

g_DSPManager->SetCutoff2Freq(C0NTR0L_RANGE-ra_HiFreqSlider. GetPos () ) ; 
else if ( (CSliderCtrl *)pScrollBar == &m_HiQSlider ) 

g_DSPManager->SetCutoff2Q(CONTROL_RANGE-m_HiQSlider. GetPos ( ) ) ; ' 
else if ( (CSliderCtrl *) pScrollBar == &m_HiBoostSlider ) 

g_DSPManager->SetCutof f2Boost (CONTROL_RANGE-m_HiBpostSlider .GetPos ( ) ) ; 

} 

void CCutoff Page :: OnBypassFirst ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButton.GetState () & 0x3; 

g_DSPManager->SetBypassSection (state, kBypassHipass) ; 



void CCutoff Page: :OnBypassSecond() 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecpndButton.GetState ( ) & 0x3; 

g_DSPManager- >SetBypassSect ion (state, kBypassLopass) ,- 

} 



2 



0008 



ffif !defined(AFX_COMPOR^^fclsER_H B5D510E7_F7D5_llD2_96EE_OOS09l^B|2 INCLUDED_) 

#define AFX_COMPORTCHOOSE^H B5D510E7 F7D5 11D2 96EE_0OSO97CDB9E2 INCLUDED 



ffif _MSC_VER >= 1000 
#pragma once 

Sendif // _MSC_VER >= 1000 

// COMPortChooser .h : header file 

// 



///////////////////////////////////////////////////////////////////////////// 
// CCOMPortChooser dialog > 

class CCOMPortChooser : public CDialog 
{ 

// Construction 
public: 

CCOMPortChooser (CWnd* pParent = NULL); // standard constructor 

int which_port; 

// Dialog Data 

//{ {AFX_DATA( CCOMPortChooser) 
enura { IDD = IDD_D IALOG3 } ; 

// NOTE: the ClassWizard will add data members here 
/ / } } AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 
//{{AFX_VIRTUAL (CCOMPortChooser) 
protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//}}AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 
// { {AFX_MSG (CCOMPortChooser) 
af x_msg void OnRadiol ( ) 
af x_msg void OnRadio2 ( ) 
afx_ms"g void OnRadio3{), 
af x_msg void OnRadio4 ( ) 
virtual BOOL Onlnitbialog ( ) ; 
//} }AFX_MSG 
DECLARE_MESSAGE_MAP ( ) 

}; 

//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_COMPORTCHOOSER_H B5D510E7_F7D5_11D2_96EE_006097CDB9E2 INCLUDED ) 
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#if !def ined(AFX_CUTOF^^B^H 6F15162S_D84D_11D2_96EE_0 0 6097CDB^^^INCLUDED_) 

#def ine AFX CUTOFF PAGE 1^^F1S1625 D84D_11D2 96EE 006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 
// Cutoff Page. h : header file 
// 

1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 
1/ CCutoffPage dialog 

class CCutoffPage : public CPropertyPage 
{ 

DECLARE_DYNCREATE (CCutoffPage) 




// Construction 
public : 

CCutof fPage () ; 

-CCutoffPage () ; 

// Dialog Data 

//{ {AFX_DATA (CCutof f Page) 
enum { IDD = IDD_PP7 } ; 
CButton m_BypassSecondButton; 
CButton mJBypassFirstButton; 
CSliderCtrl m_HiBoostSlider ; 
CSliderCtrl m_HiQSlider ; 
CSliderCtrl m_HiFreqSlider ; 
CSliderCtrl m_LoBoostSlider ; 
CSliderCtrl m_LoQSlider ,- 
CSliderCtrl m_LoFreqSlider 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

//{ {AFX_VIRTUAL (CCutof fPage) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } } AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {afx_MSG (CCutoffPage) 

virtual BOOL OnlnitDialog ( ) ,- 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 

afx_msg void OnBypassFirst ( ) ,- 

afx_msg void OnBypassSecondO ; 

//}}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

}; 

//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line, 
ftendif // '. defined (AFX_CUTOFFPAGE_H 6F151S25_D84D_llD2_96EE_O0S097CDB9E2 INCLUDED_) 
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*-^|^^:_H F4 7S7B24_HB3_11D3_96EE_0060 97Cd(^^^ 

3E_lr F4767B24 11B3 11D3 9SEE 006097CDRQC5 TMnTT! 



Sif ! defined (AFX_ALLPAS^^^^._ n ;t)/B^i_xiBJ_nuj_atit.t._uo6097CDB^W INCLUDED ) 

Sdefine AFX_ALLPASSPAGEJ^F4767B24_X1B3_11D3_96EE_006097CDB9E2_INcLudED 

tfif _MSC_VER >= 1000 
Spragma once 

jjendif // _MSC_VER >= 1000 
// AllpassPage.h : header file 
// 



iiiiiiiiiiiiiiiii/iiin/iiiiiii/i/miiiiiniiiiiiiiiii/iiiiniiini,,,/,,,,, 

II CAllpassPage dialog 
class CTabDialog; 

class CAllpassPage : public CPropertyPage 

DECLARE_DYNCREATE (CAllpassPage) 

// Construction 
public: 

CAllpassPage () ; 

-CAllpassPage () ; 

// Dialog Data 

//{ {AFX_DATA(CAllpassPage) 
enum { IDD = IDD_PP10 } ; 
CButton m_BypassButton; 
CSliderCtrl m_QSlider; 
CSliderCtrl m_FrequencySlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

/ / { { AFX_VIRTUAL ( CA1 lpa s s Page ) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//}}AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG (CAllpassPage) 

afx_msg void OnBypassO ; 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
af x_msg void OnPaint ( ) ; 
//}}AFX_MSG 
DECLARE_MESSAGE MAP ( ) 



CTabDialog *m_ParentWindow ; 
void SendStringToUI (int which); 



}; 



//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line 
#endif // ! defined <AFX_ALLPASSPAGE_H_F4767B24_11B3_11D3_9SEE_006097CDB9E2_INCLUDED_) 
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// AllpassPage.cpp : im^^fctation file 



Sinclude "stdafx.h" 
(f include "sa.h" 
^include "AllpassPage.h" 
Sinclude "TabDialog .h" 
#include "DSPS6kManager . h" 

#ifdef _DEBUG 

fide fine new DEBUG_NEW 

#undef THIS_FILE 

static char THIS_FILE[] = FILE 

#endif 




IMPLEMENT_DYNCREATE ( CA1 lpas s Page , CPr oper tyPage ) 



CAllpassPage: : CAllpassPage ( ) : CPropertyPage (CAllpassPage : : IDD) 
//{ {AFX_DATA_INIT(CAllpassPage) 

// } }afx_data init 

} 

CAllpassPage : : -CAllpassPage ( ) 
} 

yoid CAllpassPage: : DoDataExchange (CDataExchange* pDX) 

CPropertyPage: : DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP.(CAllpassPage) 

DDX_Control (pDX, IDC_CHECK1, m_BypassButton) ; 
DDX_Control(pDX, IDC_SLIDER3, m_QSlider) ; 
DDX_Control(pDX, IDC_SLIDER1, m_FrequencySlider) • 
/ / } } AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CAllpassPage, CPropertyPage) 

/ / {■ { AFX_MSG_MAP (CAllpassPage) 

ON_BN_CLICKED(IDC_CHECKl, OnBypass) 

ON_WM_VSCROLL ( ) 

ON_WM_PAINT ( ) 

//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

// CAllpassPage message handlers 
void CAllpassPage: :OnBypass () 

// TODO: Add your control notification handler code here 

mt state = m_BypassButton.GetState () & 0x3; ■ -■ - 

g_DSPManager->SetBypassSection (state, kBypassAllpass) ; 

} 

BOOL CAllpassPage: :OnInitDialog() 

CPropertyPage : : OnlnitDialog ( ) ; 

// TODO: Add extra initialization here 
m_FrequencySlider . SetRange ( 0 , C0NTR0L_RANGE ) • 

m_FrequencySlider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamVal Ue (kAllpassFreq) ) 
m_FrequencySlider.SetTicFreq((CONTROL_RANGE + l)/l6) • 
m_QSlider. SetRange (0,CONTROL_RANGE) ; 

m_QSlider.SetPos(C0NTROL_RANGE-g_DSPManager->GetParamValue(kAllpassQ))- 
m_QSlider .SetTicFreq( (C0NTROL_RANGE+l) /IS) ; 
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m_ParentWindow = (CTara 




og *) GetParent 0 ->GetParent () ; 




return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 



void CAllpassPage: :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar ; 
int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar); 

.Sleep(50) ; 
if( slider == &m_FrequencySlider ) 

which = kAllpassFreq; 
else if( slider == &m_QSlider ) 

which = kAllpassQ; 
else 

re turn ; 

g_DSPManager->SetParamValue ( CONTROL_RANGE - slider- >GetPos () , which) ; 
SendStringToUI (which) ; 



CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_FrequencySlider.SetPos(CONTROL_RANGE-g_DSPManager->GetPararaValue (kAllpassFreq)) 
m_QSlider .SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue (kAllpassQ) ) ; 
m_BypassButton. SetCheck (g_DSPManager- >GetBypassSection (kBypassAllpass) ) ; 

// Do not call CPropertyPage: :OnPaint() for painting messages 



void CAllpassPage: : SendStringToUI (int which) 



CString str; 



g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString(0, str) ; 



void CAllpassPage: :OnPaint () 
{ 
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// DSPComm. h: inter fao 
II 




the DSPComm class. 




iiiiiiiiiiiiiiiiiiiiiifi/ii/iiiiiiii/iiiiiiiiiiiimiiiiiiii/iiiiiiiii 



tfif !def ined(AFX_DSPCOMM_H_3 3F9EF05_F6EF_HD2_96EE_0060 97CDB9E2 INCLUDED ) 

#def ine AFX_DSPCOMM_H 33F9EF05_F6EF_llD2_96EE_O0S0 97CDB9E2 INCLUDED_ ~ 

ffif _MSC_VER >= 1000 
Spragma once 

Sendif // _MSC_VER >= 1000 
class DSPComm 



public :. 

virtual BOOL IsTransmitting ( ) ; 

virtual long GetDetectState (void) ; 

virtual BOOL CheckState (void) ; 

virtual long SendDSPMemory (char *, long) ; 

virtual long SendDSPWord (long) ; 

DSPComm () ; 

virtual -DSPComm (); 



#endif // ! def ined(AFX_DSPCOMM_H 3 3F9EF05_F6EF_11D2_96EE_006097CDB9E2 INCLUDED_) 
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// DSPComm. cpp: impleme: 
// 




'on of the DSPComm class. 



////// 'iiiii/iiiiiiiiii/iiiiiiiiii/hii/1,,,,1,,,,,,1111 nun inn /i/, 



Sinclude "stdafx.h" 
ffinclude "sa.h" 
tfinclude "DSPComm. h" 

ffifdef J3EBUG 
Sundef THIS_FILE 

static char THIS_FILE[)= FILE 

ffdefine new DEBUG_NEW 
ffendif 



1 1 1 1 1 1 1 1 1 1 1 1 II 1 1 1 1 1 1 1 1 1 1 II 1 1 / 1 1 1 1 1 1 1 / 1 1 / 1 1 / 1 /, 1/ / ,, 1 1 , // 1 1 ,,/ , 1 , 1 1 n , , 



1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / / / // / 1 / // 1 1 / / / / / / 1 1 / 1 / / 

DSPComm: : DSPCotran ( ) 
{ 



long DSPComm: : SendDSPWord ( long) 



re turn ( OL ) ; 

} 

long DSPComm: .-SendDSPMemory (char *data, long len) 



return ( OL ) ; 

} 

BOOL DSPComm: : CheckState ( ) 
{ 

returnf true ) ; 

} 

long DSPComm: :GetDetectState () 



return ( OL ) ; 



// Construction/Destruction 



DSPComm: :~DSPComm() 



BOOL DSPComm: : I sTransmit ting () 



return ( false ) ; 

} 



for the CDSP56kManager class. 



// DSP56kManager .h: int\ 
// 

////////////////////////////////////////////////////////////////////// 

tfif ! defined (AFX_DSPS6KMANAGER_H_OCF7E204_D790_11D2_9SEE_006097CDB9E2 INCLUDED 

fldefine AFX_DSP5SKMANAGER_H OCF7E204_D790_11D2_96EE_0060 97CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
Spragma once 

Sendif // _MSC_VER >= 100 0 

#include "DSP56Equates .h" 
# include "DSPGomm.h" 

#define CONTROL_RANGE_L2 12 

#define CONTROL_RANGE ( (lL<<CONTROL_RANGE_L2 ) - 1) 

#define PG_CONTROL_AMT ( CONTROL_RANGE/64 ) 

#define CONTROL_RANGE_SC (23 -CONTROL_RANGE_L2 ) 

#define DS P_CONTROL_MAX 8388608. 

class CDSP56kManager 
{ 

long m_DSPReturn; 

long m_Raw2DSPVals [kUIArraySize] ; 
long ra_RawVals [kUIArraySize] ; 
long m_DSPVals [kDSPArraySize] ; 
double m_pi • 
DSPComm *m_Comm; 

public: 

void GetPureStringValue (int which, CString &str) ; 

void GetFilterBlobtCStringArray &array) ; 

virtual BOOL GetBypassSection (int which); 

virtual void SetBypassSection(BOOL value, int which) ; 

virtual BOOL IsBusyO; 

virtual void GetStringValue (int which, CString &str) ; 

virtual BOOL IsReady (void) ; 

virtual void SetAnaloglnput (long) ■ 

virtual int GetHDCDMode (void) ; 

virtual void ResetAll (void) ; 

virtual void SetHDCDGainScale (long) ; 

virtual void SetHDCDBypass (long) ; 

virtual void SetDDXCompBypass (long) ; 

virtual void SetBypass (long value); 

virtual void GetDSPSettings (CStringArray &array) ; 

virtual void SetDSPSettings (CStringArray tarray) ; 

virtual void SetParamValue (long value, long which); 

virtual long GetParamValue (long which); 

void DownloadDSPCode (void) ; 

CDSP5 6kManager (HWND p) ; 
virtual -CDSP5 6kManager ( ) ; 

private : 

void SetNotchQdong value, long which, long freqwhich); 
void SetNotchFregdong value, long which); 
void SetShelvFreqdong value, long which); 
void SetBoostCutdong value, long which); 
void SetRawValuedong value, long which); 

double DoConvertFreqRange (double in, double top, double bottom); 
double ConvertFreqRange (int which); 
double ConvertQRange (long val) ; 
double ConvertBoostCutRangedong val) ; 
virtual void SendDSPValue ( long which); 

int ChecksumSREC (char *lineptr,int N) ; 

void GetSRecordAddressRangefchar . s , long *start, long *end, char **data) ; 

protected: 

virtual void SetDelaydong value) ,- 
void SetLoCutof f (void) ; 
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void SetHiCutof f (void) ; 
void SetHiCutof f 2 (void) 



virtual void SetHiCutof f2Q (long value); 
virtual void SetHiCutof f2Freq(long value) 
virtual void SetHiCutof fQdong value) ; 
virtual void SetHiCutof fFreq (long value); 
virtual void SetLoCutof fQdong value) ; 
virtual void SetLoCutof fFreq ( long value) ; 
virtual void SetPreVolume (long value); 
virtual void SetAnalogVolume (long value); 



// virtual void SetCutof f lFreqdong value) ,- 

// virtual void SetCutof flQdong value) ; 

// virtual void SetCutof flBoost ( long value); 

// virtual void SetCutof f2Freq ( long value); 

// virtual void SetCutof f2Q (long value) ; 

// virtual void SetCutof f2Boost (long value); 

virtual void SetShelvlFreq (long value); 

virtual void SetShelvlBoost (long value); 

virtual void SetShelv2Freq (long value) ; 

virtual void SetShelv2Boost (long value); 

virtual void SetNotchlCut (long value); 

virtual void SetNotchlQdong value) ; 

virtual void SetNotchlFreq (long value); 

virtual void SetNotch2Cut (long value) ; 

virtual void SetNotch2Q (long value) ; 

virtual void SetNotch2Freq (long value); 

virtual void SetNotch3Cut (long value) ; 

virtual void SetNotch3Q (long value) ; 

vistual void SetNotch3Freq (long value); 

viftual void SetNotch4Cut (long value) ; 

victual void SetNotch4Q(long value) ; 

victual void SetNotch4Freq (long value); 

vigtual void SetNotchSQ (long value) ; 

victual void SetNotchSBoost (long value); 

virtual void SetNotch6Cut (long value); 

viEtual void SetNotch6Q (long value) ; 

viirtual void SetNotch6Freq (long value); 

victual void SetNotch7Cut ( long value) ; 

virtual void SetNotch7Q ( long value) ; 

virtual void SetNotch7Freq(long value) ; 

viitual void SetNotch9Freq (long value); 

virtual void SetMainVolume (long value); 




extern CDSP56kManager *g_DSPManager ; 

#endif // !defined(AFX DSP56KMANAGER H 0CF7E204 D790 11D2 96EE 006097CDB9E2 INCLUDED_) 



// DSP56kManager .cpp: implementat^^^of the CDSP56kManager class. 

////////////////////////////////////////////////////////////////////// 

# include "stdafx.h" 
ftinclude "sa.h" 
#include "DSP56kManager .h" 
ft include <math.h> 
ftinclude <stdlib.h> 
((include <stdio.h> 
ftinclude <string.h> 

#if 0 

ftinclude "unitjppi.h" 
ftinclude "functs.h" 
ffendif 

ftifdef SPI 

ftinclude "SPIPEMicroComm. h" 
ftendif 

ftinclude "I2CIPortComm.h" 



ftinclude "sapmem.h" 
ftinclude "SSTParams .h" 



ftifdef _DEBUG 
ftundef THIS_FILE 

static char THIS_FILE {] =_FILE ,- 

ftdefine new DEBUG_NEW 
ft'efidif 

Mi r t 0 

static int cmd_delay = 1000; 
s]t%tic int io_delay = 50; 
fteAdif 

(^define FILE_VERSION 2 // file version 

((define GAIN~SCALE 8. 

I-/ volume 

ftdjpfine VOLTOP 1. 

tjcfefine VOLBOT 3.909e-6 

#d4fine VOLRANGE (VOLTOP-VOLBOT) 

JA hi and lo cutoff and shelving ranges 

idefine FLCTOPRANGE 0.149 // 1000/22050 

Idefine FLCBOTRANGE 0.0017S9 // 10/22050 

fcfefine FLC RANGE ( FLCTOPRANGE - FLCBOTRANGE ) 

ftdefine FLCTOPRANGE2 4.255 // 2000 

ftdefine FLCBOTRANGE 2 2.134 // 15 



ftdefine FHCTOPRANGE 1 // 22050/22050 

ftdefine. FHCBOTRANGE 0.63 . - /./ 8000/22050 

ftdefine FHCBOTRANGE2 0.42 // 4000/22050 

ftdefine FHCRANGE ( FHCTOPRANGE -FHCBOTRANGE) 
ftdefine FHCRANGE2 (FHCTOPRANGE- FHCBOTRANGE 2) 



ftdefine QLCTOPRANGE 1.0 // 1 

ftdefine QLCBOTRANGE 0.003891 // 0.001 

ftdefine QLC RANGE (QLCTOPRANGE- (QLCBOTRANGE) ) 

ftdefine SAMPLING_FREQ 44100 
ftdefine DELAY_LENGTH 128. 

// converts frequency range to log scale 

ftdefine FTOPRANGE 1. 

ftdefine FBOTRANGE 0.134 

ftdefine FRANGE (FTOPRANGE -FBOTRANGE) 

ftdefine FTOPRANGE2 0.585 // about 2205 top. 

ftdefine FBOTRANGE2 3.531E-3 
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^^^^requencies ^^^^ 

ili / / 3000 Hz 



// new ranges using act 

((define FTOPRANGE3 4.43T^// 3000 Hz 
((define FBOTRANGE3 2.433 // 30 Hz 

// hi cutoff filter ranges 

((define QHC2BOT 0.74 

((define QHC2TOP 2.258 

((define FHC2BOT 3.954 // 1000 Hz 

((define FHC2TOP 5.255 // 2 0 kHz 

((define FHCTOPRANGE3 5.13 // 15000 

((define FHCBOTRANGE3 FHC2B0T 



static char *m_ParamNames [kUIArraySize] = { "MainVolume" , 
"LoShelfFreq" , 
"LoShelfGain" , 
"HiShelfFreq" , 
"HiShelfGain" , 
"NotchlFreq" , 
"NotchlQ", 
"NotchlCut",' 
"Notch2Freq" , 
"Notch2Q" , 
"Notch2Cut", 
"Notch3Freq" , 
"Notch3Q", 
"Notch3Cut", 
"Notch4Freq" , 
"Notch4Q", 
"Notch4Cut" , 
"Notch5Freq" , 
"Notch5Q" , 
"Notch5Cut", 
"PreVolume " , 
"Bypass", 
"LoCutoffFreq" , 
"LoCutof fQ" , 
"HiCutoffFreq" , 
"HiCutoffQ", 
"HDCDBypass" , 
"HDCDGainScaleOf f " , 
"DDXCompBypass " , 
"Notch6Freq" , 
"NotchSQ" , . 
"Notch6Cut" , 
"Notch7Freq» , 
"Notch7Q" , 
"Notch7Cut", 
"Analogln", 
"AnalogVolume" , 
"Delay", 
"AllpassFreq" , 
"AllpassQ" , 

"BypassMask" , ....... 

"HiCutoff2Freq", 
"HiCutoff2Q" , 
"NotchSFreq" , 
"Notch8Q" , 
"Notch8Cut" , 
"Notch9Freq" , 
"Notch9Q" , 
"Notch9Cut", 
"NotchAFreq" , 
"NotchAQ" , 
"NotchACut", 
"DBNotchWidth" } ; 

////////////////////////////////////////////////////////////////////// 
// SREC code 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 1 1 1 1 1 1 1 1 1 1 f 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 
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s^^^mSREC (char int N) ^^^^ 



int CDSP56kManager: iChecWumSREC (char -lineptr, int N) 

unsigned char curbyte, sum=0xf f ; 
for (int x=2 ;x<N-2 ;x+=2) 
{ 

sscanf (iineptr+x, "%2x" , Scurbyte) ; 
sum- = curbyte ; 

} 

// last one is checksum 
sscanf (lineptr+x, "%2x" , tcurbyte) ; 
return (curbyte==sum) ; 



void CDSP56kManager ::G etSRecordAddressRange(char *s. long -start, long *end, char "data) 

long address, count, soffset,- 

♦start = -1L; 
*end = -1L; 

if (*s != 'S' ) // not a srec 
return; 

/ / Let 1 s check the checksum for this line 
ASSERT ( ChecksumSREC (s, strlen(s) ) ) ,- 
switchf s[l] ) 
{ 

case 1 1 1 : 

soffset=8; 

sscanf (&(s [4] ) , "%4x" , taddress) ; 
break; 
case 1 2 1 : ' 
soffset=10; 

sscanf (&(s [4] ) , "%6x" , &address) ; 
break; 
case 1 3 ' : 

sof fset=12 ; 

sscanf (&(s [4] ), "%8x", Siaddress) , • 
break ; 
default: 
return; 
break; 

} 

count = strlen(s) - soffset - 2; 
•start = address; 

♦end = address + (count/S) ; // each word is 6 characters 

*data = s + soffset; 



void CDSP56kManager: : DownloadDSPCode ( ) 

char **r = pmem; 

int count = PRECORDS; 

long start, end; 

long ts, te; 

char **recs; 

char *srecdata, *td; 

char *data, *dptr, *rdata, c; 

long size,bsize; 

long taddress, recstart, recend; 

long value ; 
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1 ^^^^1' 



// get starting and ending addresses 
start = 0X7FFFFFFFL; 
end = 0; 
recs = r; 

fort int i = 0; i < count ; i++ ) 
{ 

GetSRecordAddressRange (*recs++, &ts, &te, tsrecdata) 
if( ts < 0L ) continue; 
start = mintstart, ts) ; 
end = max(end,te); 



size = end - start; 
bsize = size * 3; 

rdata = (char *) malloc (bsize+6) ; // 3 bytes per word plus length and address 

ASSERT ( data ! = NULL ) ; 
data = rdata + 6; 



dptr = data; 

for( i = 0 ; i < bsize ,- i++ ) // clear memory 

*dptr++ = 0; 
taddress = start; 
while ( taddress < end ) 
{ 

recstart = 0x7FFFFFFFL; 
recs = r; 

for( int i = 0; i < count ; i++ ) // search for next address 

{ 

GetSRecordAddressRange (*recs , 6ts, &te, ttd) ; 

if ( ts >= 0L ) 

{ 

if( ts >= taddress ) 
{ 

iff ts < recstart ) 
{ 

recstart = ts; 
recend = te ; 
srecdata = td; 

} 

} 

} 

recs++; 

} 

ASSERT ( recstart <= end ) ; 
// copy record 

dptr = data + ((recstart - start) *3); 

while ( recstart != recend ) 

{ 

sscanf (srecdata, 11 %2x" , &value) ; 
*dptr++ = (char ) value; 
srecdata += 2 ,- 

sscanf (srecdata, "%2x" , lvalue) ; 
*dptr++ = (char ) value; 
srecdata += 2 ; 

sscanf (srecdata, "%2x" , &value) ; 
*dptr++ = (char ) value; 
srecdata += 2 ; 
recstart ++; 

} 

taddress = recend; 

) 

// copy size and address 

dptr = rdata; 

c = (size >> 16) & OxFF; 

*dptr++ = c; 

C = (size >> B) £c OxFF; 

*dptr++ = c; 

c = size & OxFF; 

*dptr++ = c; 

C = (start >> 16) £. OxFF; 
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*dptr++ = C; 

c = (start >> 8) & 




*dptr++ = c; 

c = start & OxFF; 

*dptr++ = c; 

// send data to DSP 
//m_Comm->SendDSPWord(size) ; 
//ra_Comm->SendDSPWord( start) ; 
m_Comm->SendDSPMemory (rdata, bsize+6) ; 

free ( rdata ) ; 



1 1 1 1 J 1 1 1 1 1 U 1 1 1 1 f 1 1 1 1 1 1 1 1 1 / / / 1 1 1 1 / 1 , 1 1 / , , , , , , , , , i , n , ,j , , , , , , , ! n ! n 
II Construction/Destruction 

1 1 1 1 1 1 1 1 1 1 / / 1 1 1 1 1 1 1 / 1 1 1 1 / / 1 1 1 / 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 / 1 1 1 1 J / 1 / 1 1 1 1 1 1 1 1 J J J / J i / 
CDSP56kManager : : CDSP5 6kManager (HWND p) 

(tif 0 

if( load_dll{) ==false ) 

else 
{ 

init_port_spi (1) ; 

set^_cmd_delay_cnt_value (cmd_delay) ; 
^ set_io_delay_cnt_value (io_delay) ; 

ffendif 

m_pi = acos(-l.) ■ 

m_Comm = new I2CIPortComm(pj ; 

// DownloadDSPCode () ; 



int i ; 

for( i = 0 ; i < kUIArraySize ; i++ ) 
m_Raw2DSPVals [i] = i- 

) 

m_Raw2DSPVals [kNotchSFreq] = kDSPNotch6Freq • 
m_Raw2DSPVals [kNotch6Q] = kDSPNotch6Q; 
m_Raw2DSPVals[kNotch6Cut] = kDSPNotchSCut ; 
m_Raw2DSPVals [kNotch7Freq] = kDSPNotch7Freq • 
m_Raw2DSPVale [JcNotch7Q] = kDSPNotch7Q; 
m_Raw2DSPVals [kNotch7Cut] = kDSPNotch7Cut ■ 
m_Raw2DSPVals [kDelay] = kDSPDelay ; 
m_Raw2DSPVals[kAllpassFreq] = kDSPAllpassFreq • 
m_Raw2DSPVals [kAllpassQ] = kDSPAllpassQ; 

m_Raw2DSPVals [kNotchSFreq] = kDSPNotchSFreq- 
m_Raw2DSPVals [kNotch8Q] = kDSPNotchSQ- 
m_Raw2DSPVals [kNotchSCut] = kDSPNotchSCut- 
m_Raw2DSPVals [kNotchSFreq] = kDSPNotchSFreq- 
m_Raw2DSPVals [kNotch9Q] = kDSPNotch9Q; 
m_Raw2DSPVals [kNotch9Cut] = kDSPNotch9Cut • 
m_Raw2DSPVals [kNotchAFreq] = kDSPNotchAFreq • 
m_Raw2DSPVals [kNotchAQ] = kDSPNotchAQ; 
m_Raw2DSPVals [kNotchACut] = kDSPNotchACut ; 

ResetAlK); 



0021 

5 



CDSP56kManager : : -CDSP5^^^piger ( 

{ 

i f ( m_Comm ) 
delete in Coram; 



void CDSP56kManager : : SetMainVolume ( long value) 

double f value ; 

if ( value >= 0 ) 

SetRawValue (value, kMainVolume) ; 
if( m_RawVals [kMainVolume] == DSP_CONTROL_MAX ) 

m_DSPVals [kDSPMainVolurae] = -m_RawVals [kMainVolume] 
else iff m_RawVais [kMainVolume] == 0 ) 

m_DSPVals [kDSPMainVolume] = 0; 
else 

( 

f value = m_RawVals [kMainVolume] ,- 

fvalue /= DSP_CONTROL_MAX; // normalize 

f value *= VOLRANGE; 

fvalue += VOLBOT; 

fvalue = (pow (10 ., fvalue) - 1. ) / (10. -1. ) ; 
fvalue *= DSP_CONTROL_MAX; 

m_DSPVals [kDSPMainVolume] = (long) -fvalue; 



SendDSPValue (kDSPMainVolume) ; 

} 

void CDSP5SkManager: : SendDSPValue (long which) 

long value = m_DSPVals [which] ; 
#if 0 



// transmitted value has parameter value in top 16 bits and parameter identifier in 8 LSBs 
value = (value & OxFFFFOO) | (which & OxFF) ; 



// m_DSPReturn = spi_xchng24 (value) , 

m_DSPReturn = m_Comm->SendDSPWord (value) ; 
#endif 

// changed protocol around to send index followed by data 
char buffer [6] ; 

buffer [0] = (which >> 16) & OxFF; 
buffer [1] = (which >> 8) & OxFF; 
buffer [2] = which & OxFF; 
buffer [3] = (value. >> 16) & OxFF; 
buffer [4] = (value >> 8) & OxFF; 
buffer [5] = value & OxFF; 

m_DSPReturn = m_Comm- >SendDSPMemory (buffer, 6) ; 



void CDSP56kManager: : SetNotchFreq ( long ivalue,long which) 
double value; 

int dspindex = m_Raw2DSPVals [which] ; 

if( ivalue >= 0 ) 

SetRawValue (ivalue, which) ; 
value = ConvertFreqRange (which) ; 
value = - cos (m_pi*value) ; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [dspindex] = (long) value,- 



0022 



6 



SendDSPValue (dspinde: 
SetNotchQ(-lL, which+: 




l^BKch) ; 




} 



#ifdef LEGACY 

void CDSP5 6kManager: : SetShelvFreq (long ivalue, long which) 
double value, wc; 

int dspindex = m_Raw2DSPVals [which] ; 

if( ivalue >= 0 ) 

SetRawValue (ivalue, which) ; 
value = ConvertFreqRange (which) ; 
wc = m_pi*value; 

value = (tan(wc/2) -l)/(tan(wc/2)+l) ; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [dspindex] = (long) value; 
SendDSPValue (dspindex) ; 



void CDSP56kManager: : SetNotchQ (long ivalue, long which, long rawfreq) 

double beta, tbeta, q,wc,- 

int dspindex = m_Raw2DSPVals [which] ; 

iff ivalue >= 0 ) 

SetRawValue (ivalue, which) ; 
wc = ConvertFreqRange (rawfreq) ; 
wc = m_pi*wc; 

q = ConvertQRange (m_RawVals [which] ) ; 
tbeta = wc/ (2*q) ; 
if( tbeta > m_pi/4 ) 

tbeta = m_pi/4; 
beta = (1. -tan (tbeta) )/ (1 . +tan (tbeta) ) ; 
beta *= DSP_CONTR0L_MAX; 
m_DSPVals [dspindex] = (long) beta; 
SendDSPValue (dspindex) ; 



void CDSP5SkManager: :SetBoostCut (long ivalue, long which) 
double value; 

int dspindex = m_Raw2DSPVals [which] ; 

iff ivalue >= 0 ) 

SetRawValue (ivalue, which) ; 
value = ConvertBoostCutRange (m_RawVals [which] ) ; 
value = pow (10. .value) ; 
value /= GAIN_SCALE; 
value *= DSP_CONTROL_MAX; 
m_DSPVals [dspindex) = (long) value; 
SendDSPValue (dspindex) ; 



void CDSP56kManager : : SetShelvlFreq (long ivalue) 



// SetShelvFreq (value, kLoShelf Freq) ; 
double value , wc ; 

if( ivalue >= o ) 

SetRawValue ( ivalue, kLoShelf Freq) ; 
value = m_RawVals [kLoShelf Freq] ; 
value /= DSP_CONTROL_MAX; // normalize 



} 



#endif 



} 
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value *= FLCRANGE; 
value += FLCBOTRANGE; 
value = (pow(10 . .value) - 1 . ) / (10 . -1 . ) ; 
wc = m_pi*value; 

value = (tan(wc/2) -1) / (tan(wc/2) +1) ; 
value *= DSP_C0NTR0L_MAX; 
m_DSPVals [kLoShelf Freq) = (long) value; 
SendDSPValue (kLoShelf Freq) ; 

} 

void CDSP56kManager : :SetShelvlBoost (long value) 
{ 

. SetBoostCut (value, kLoShelf Gain).; 
} 

void CDSP56kManager : :SetShelv2Freq (long ivalue) 
{ 

// SetShelvFreq (value, kHiShelf Freq) ,- 
double value, wc; 

if( ivalue >= 0 ) 

SetRawValue (ivalue, kHiShelf Freq) ; 
value = ra_RawVals [kHiShelfFreq] ; 
value /= DSP_C0NTR0L_MAX; // normalize 
value *= FHCRANGE2; 
value += FHCB0TRANGE2 ; 

value = (pow ( 10 ., value) - 1.1/(10.-1.); 
wc = m_pi*value; 

value = (tan(wc/2) -1) / (tan(wc/2) +1) ; 
value *= DSP_C0NTR0L_MAX; 
m_DSPVals [kHiShelf Freq] = (long) value; 
SendDSPValue (kHiShelfFreq) ; 

} 

void CDSP56kManager : :SetShelv2Boost (long value) 
( 

SetBoostCut (value, kHiShelf Gain) ; 

} 

void CDSP56kManager : : SetNotchlFreq ( long value) 
{ 

SetNotchFreq(value, kNotchlFreq) ; 

} 

void CDSP56kManager : : SetNotchlQ ( long value) 

{ 

SetNotchQ (value , kNotchlQ, kNotchlFreq) ; 

} 

void CDSP56kManager: : SetNotchlCut (long value) 
{ 

SetBoostCut (value, kNotchlCut) ; 

} 

void CDSP56kManager : : SetNotch2Freq ( long value) 
{ 




SetNotchFreq (value, kNotch2Freq) ; 




void CDSP56kManager : : SetNotch2Q ( long value) 
{ 

SetNotchQ (value, kNotch2Q, kNotch2Freq) ; 

) 

void CDSP56kManager: :SetNotch2Cut (long value) 
{ 

SetBoostCut (value, kNotch2Cut) ; 

} 



■void CDSPSSkManager : :SetNotch9Freq(long value) 
{ 

double q, f , nf ; 

SetNotchFreq (value, kNotch9Freq) ; 

f = ConvertFreqRange (kNotch9Freq) ; 

q = ConvertQRange (m_RawVals [kNotch9Q] ) ; 

nf = f - (f / (5.*q)) ; 

if( nf < 0. ) 

nf = 0 . ; 
nf = pow(nf , 0.5) ,- 

nf = logl0((nf * (10.-1.)) + 1 . ) ; 

nf - = FBOTRANGE; 

nf /= ( FTOPRANGE- FBOTRANGE ) ; 

nf *= DSP_CONTROL_MAX; // normalize 

m_RawVals [kNotch8Freq] = (long) nf; 

nf = f + (f / <5.*q)) ; 

if( nf > 1. ) 

nf = 1.; 
nf = pow(nf , 0 . 5) ; 

nf = loglO((nf * (lo.-l.)) + 1 . ) ; 

nf -= FBOTRANGE; 

nf /= (FTOPRANGE -FBOTRANGE) ; 

nf *= DSP_CONTROL_MAX; // normalize 

m_RawVals [kNotchAFreq] = (long) nf; 

SetNotchFreq (- 1L, JcNotch8 Freq) ; 

SetNotchFreq(-lL, kNotchAFreq) ; 

} 

void CDSP56kManager : :SetNotch3 Freq (long value) 
{ 

SetNotchFreq (value , kNo tch3Freq) ; 

m_RawVals [kNotchSFreq] = (m_RawVals [kNotch4Freq] + m_RawVals [kNotch3Freq] ) /2 ; 
SetNotchFreq (-lL,kNotch5 Freq) ; 

} " ' ^ ' ' ' 

void CDSP56kManager : :SetNotch3Q(long value) 



SetNotchQ (value, kNotch3Q, kNotch3Freq) ; 



} 

void CDSPSSkManager: :SetNotch3Cut (long value) 
{ 

SetBoostCut (value, kNotch3Cut) ; 

) 
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void CDSP56kManager : :Se 
{ 



h4Freq(long value) 



SetNotchFreq (value, kNotch4Freq) ; 

m_RawVals [kNotch5Freq] = (m_RawVals [kNotch4Freq] + m_RawVals [kNotch3Freq] ) /2 ; 
SetNotchFreq(-lL,kNotch5Freq) ; 



} 



void CDSP56kManager : : SetNotch4Q ( long value) 
SetNotchQ (value , kNotch4Q, kNotch4Freq) ; 

} 

void CDSP56kManager: :SetNotch4Cut (long value) 

SetBoostCut (value, kNotch4Cut) ; 

} ■ 

void CDSP56kManager : :SetNotch5Q(long value) 
SetNotchQ (value, kNotchSQ, kNotchSFreq) ; 

} 

void CDSP56kManager : : SetNotch5Boost (long value) 
SetBoostCut (value, kNotchSCut) ; 

} 



double CDSP56kManager: : DoConvertFreqRange (double val, double top, double bottom) 

val /= DSP_CONTROL_MAX; // normalize 
val *= top - bottom; 
val += bottom; 

val = (pow(10. ,val) - 1 . ) / (10 . -l . ) ; 
return ( val ) ; 



) 

double CDSP56kManager : : ConvertFreqRange ( int which) 



double fval; 



switch! which ) 

{ ~ ■ 

case kNotchlFreq: 
case kNotch2Freq: 

fval = DoConvertFreqRange (m_RawVals [which] , FTOPRANGE3 , FB0TRANGE3) ; // top frequency is 0.1 * Nyquis 

fval /= SAMPLING_FREQ/2 ; 
break; 
default : 

fval = DoConvertFreqRange (m_RawVals [which] , FTOPRANGE, FBOTRANGE) ; 
// square log scale 
fval = fval * fval; 
break; 

} 

return ( fval ) ; 



} 
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/ / converts Q range to l^^fcale 

Sdefine QTOPRANGE 2.258 

((define QBOTRANGE 0.03 7 

Sdefine QRANGE { QTOPRANGE - QBOTRANGE ) 

double CDSPSSkManager: : ConvertQRange ( long ival)„ 

double val ; 
val = ival ; 

val /= DSP_CONTROL_MAX; // normalize 
val *= QRANGE; 
val += QBOTRANGE; 

val = (pow (10 . , val) - 1.) / (10. -1 .) ; 
return! val ) ; 

) 

// converts input value to log gain value 
//#define LOG8 0.9031 

Sdefine LOGGAINSCALE (loglO (GAIN_SCALE) ) 

double CDSP56kManager: :ConvertBoostCutRange (long ival) 

double val; 
val = ival; 

val /= DSP_CONTROL_MAX; // normalize 

val = (2 . *val*LOGGAINSCALE) - LOGGAINSCALE ; 

return) val ) ; 

) 

void CDSPSSkManager: • SetRawValue (long value, long which) 

if( value ) 

value += 1; 
value <<= CONTROL_RANGE_SC ; 
m_RawVals [which] = value; 

} 

long CDSP56kManager: :GetPararaValue (long which) 
long value; 

if( which >= kUIArraySize ) 

value = 0X4000O0L >> CONTROL_RANGE_SC ; 
else 

value = m_RawVals [which] >> C0NTR0L_RANGE SC; 
value--; 
if ( value < 0 ) 

value = 0 ; 
return ( value ) ; 



1 CDSP56kManager: :SetParamValue (long value, long which) 

switch ( which ) 
{ 

case kHiCutof f2Freq: 

SetHiCutoff2Freq (value) ; 

break; 
case kHiCutoff2Q: 

SetHiCutoff2Q (value) ; 

break; 
case kHiCutof fFreq: 
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SetHiCutof f Freq ( v 
break ; 
case kHiCutoffQ: 

SetHiCutof EQ (value) ; 
break; 
case kLoCutof f Freq : 

SetLoCutoff Freq (value) ; 
break ,- 
case kLoCutoffQ: 

SetLoCutoff Q (value) ; 
break ; 
case kBypass: 

SetBypass (value) ,- 
break ; 
case kDDXCompBypa s s : 

SetDDXCompBypass (value) ; 
break; 
case kHDCDBypass : 

SetHDCDBypass (value) ; 
break; 
case kHDCDGainScaleOf f : 
SetHDCDGainScale (value) ; 
break ; 
case kAnalogVolume : 

SetAnalogVolume (value) ; 
break; 
case kMainVolume: 

SetMainVolume (value) ,- 
break; 
case kPreVolume: 

SetPreVolurae (value) ; 
break; 
case kLoShelfFreq: 

SetShelvlFreq (value) ; 
break; 
case kHiShelf Freq.- 

SetShelv2Freq(value) ; 
break; 
case kNotch8Cut: 

SetBoostCut (value, which) ; 
SetBoostCut (value, kNotchACut) ; 
break; 
case JcNotchlCut: 
case kNotch2Cut: 
case kNotch3Cut: 
case kNotch4Cut: 
case kNotch5Cut: 
case kNotch6Cut: 
case kNotchJCut: 
case kLoShelfGain: 
case kHiShelf Gain: 

SetBoostCut (value, which) ; 
break ; 
case kNotch9Cut: 

m_DSPVals [kDSPNotch9Cut] = 0; 
SendDSPValue (JcDSPNotchSCut) ; 
break; 
case kNotch3Freq: 

SetNotch3 Freq (value) ; 
break; 
case kNotch4Freq: 

SetNotch4 Freq (value) ; 
break; 
case kNotch9Freq: 

SetNotch9Freq (value) ; 
break; 
case kNotchlFreq: 
case kNotch2Freq: 
case kNotchSFreq.- 
case kNotch6Freq: 
case kNotch7Freq: 
case kAllpassFreq: 




• 



// same value for both notches 



// fixed notch 
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SetNotchFreq(val^^^iich) ; 

break; 
case kNotchBQ: 

SetNotchQ (value, which, which-1) ; 

SetNotchQ(value,kNotchAQ,kNotchAQ-l) ,- // same value for both notches 

break; 
case kNotchSQ: 

SetNotchQ (value, which, which-1) ; 

SetNotch9Freq(-l) ; 

break ; 
case kNotchlQ: 
case kNotch2Q: 
case kNotch3Q: 
case kNotch4Q: 
case kNotch5Q: 
case kNotch6Q: 
case kNotch7Q: 
case kAllpassQ: 

SetNotchQ (value, which, which-1) ; 

break; 
case kDelay: 

SetDelay (value) ; 

break ; 

// case kDBNotchWidth: 
// SetDelay (value) ; 

break; 
case kNotchSFreq: 
case kNotchAFreq: 
case kNotchACut: 
case kNotchAQ: 
break; 

} 



void CDSP56kManager.- : SetDSPSettings (CStringArray & array) - 
int i ; 

CString string; 

int index; 

long value; 

int fileversion = 0; 

int j = 0; 

double Cvalue ; 

const char *sptr; 

// reset all parameters 
ResetAlK); 

// first check for comment at head 
string = array. GetAt (0) ; 
sptr = string; 

if( strcmp (sptr, "# VERSION" ) == 0 ) 
{ - 
string = array. GetAt (1) ,- 
sptr = string; 

sscanf (sptr, "%d" , tf ileversion) ; 
j = 2; 

} 

for( i = j ,- i < array. GetSizeO ; i++ ) 

string = array .GetAt (i) ; 
sptr = string; 

if ( sptr[0] == •#' ) continue; // skip comments 

sscanf (sptr, " %d\t0x%x" , iindex, frvalue) ; 

if( index >= kUIArraySize ) continue; 

// Add any special treatment of parameters here 

if ( fileversion == 0L ) 

{ 

switch! index ) 
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• { 




ti case kNotchlFreq: 

case JcNotch2Freq: 

fvalue = DoConvertFreqRange (value , FTOPRANGE, FBOTRANGE) ; 
f value = fvalue * fvalue; 
fvalue *=, SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10.-1.)) + 1.); 

fvalue -= FBOTRANGE 3 ; 

fvalue /= ( FTOPRANGE3 - FB0TRANGE3 ) ; 

if( fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_C0NTR0L_MAX; // normalize 
value = (long) fvalue; 
break; 

// increased low frequency 
case kHiShelf Freq: 

fvalue = DoConvertFreqRange (value, FHCTOPRANGE, FHCBOTRANGE) 
fvalue = loglO ( (fvalue * (10.-1.)) + l.) ; 
fvalue -= FHCBOTRANGE2-; 

fvalue /= ( FHCTOPRANGE -FHCBOTRANGE2) ; 
if( fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
break; 
case kHiCutof f Freq: 

fvalue = DoConvertFreqRange (value , FHCTOPRANGE, FHCBOTRANGE) 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + l.) ; 

fvalue -= FHCBOTRANGE3 ; 

fvalue /= ( FHCTOPRANGE3 - FHCBOTRANGE3 ) ; 
if( fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
break ; 

} 

} 

else if( fileversion == 1L ) 
{ 

switch ( index ) 
{ 

case kNotchlFreq: 
case kNotch2Freq: 

fvalue = DoConvertFreqRange (value, FTOPRANGE2, FBOTRANGE2) ; 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + 1.); 

fvalue -= FBOTRANGE3; 

fvalue /= (FT0PRANGE3 -FBOTRANGE3 ) ; 

if ( fvalue > 1.0 ) 

fvalue =1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue; 
break ; 

case kLoCutof f Freq: _ 

fvalue = DoConvertFreqRange (value, FLCTOPRANGE , FLCBOTRANGE) 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + 1.); 

fvalue -= FLCBOTRANGE2 ; 

fvalue /= ( FLCTOPRANGE2 - FLCBOTRANGE2 ) ; 
iff fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_C0NTR0L_MAX; // normalize 
value = (long) fvalue; 
break; 
case kHiCutof f 2 Freq: 

fvalue = DoConvertFreqRange (value, FTOPRANGE, FBOTRANGE) ; 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + l.) ; 

fvalue -= FHC2BOT; 

fvalue /= ( FHC2TOP- FHC2BOT) ; 

if( fvalue > 1.0 ) 
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f value = 

f value *= DSP_CONTROL_MAX; // normalize 
value = (long) f value; 
break; 
case kHiCutof f Freq: 

fvalue = DoConvertFreqRange (value, FHCTOPRANGE, FHCB0TRANGE2 ) 

fvalue *= SAMPLING_FREQ/2 ; 

fvalue = loglO ( (fvalue * (10. -1.)) + 1 . ) ; 

fvalue -= FHCBOTRANGE3 ; 

fvalue /= (FHCTOPRANGE3 -FHCB0TRANGE3 ) ; 
iff fvalue > 1.0 ) 

fvalue = 1.0; 
fvalue *= DSP_CONTROL_MAX; // normalize 
value = (long) fvalue,- 
break; 

} 

) 

m_RawVals [index] = value; 

) 

// tell DSP of- changes 
for( i = 0 ; i < kUIArraySize ; i++ ) 
{ 

SetParamValue (-1, i) ; ; 
} 

m_DSPVals [kDSPBypassMask] = m_RawVals [kBypassMask] ; 
SendDSPValue (kDSPBypassMask) ; 

) - 

void CDSP56kManager : iGetDSPSettings (CStringArray & array) 

char s [1000] ; 
int i , index ; 
int j = 0; 
CString cstr; 

// write header (so far only version number) 

cstr = "# VERSION"; 

array. SetAtGrow(j++, cstr) ; 

spr intf ( s , " %d" , FILE_VERSION) ; 

array. SetAtGrow (j++, s) ; 

cstr = "# DATA"; 

array. SetAtGrow (j++, cstr) ,- 

for( i = 0 ; i < kUIArraySize ; i++ ) 
{ 

index = kUIArraySize- i-i; 

if ( index == kBypass ) continue; 

if ( index == kHDCDBypa s s ) continue; 

if ( index == kHDCDGainScaleOf f ) continue; 

if ( index == kAnalogln ) continue; 

//MM 7/14/99 Added value in human readable form as comment 
GetStringValue (index, cstr) ; 

sprintf (s, "# %s %s"_,m_ParamNames [index] , cstr) ; 
array . Se t AtGrow ( j ++ , s ) ; 

sprintf (s, "%d\t0x%x" , index, m_RawVals [index] ) ; 
array. SetAtGrow (j++, s) ; 

) ' 

} 

void CDSP56kManager : :GetFilterBlob (CStringArray & array) 

char s [1000] ; 
int param; 
int j = 0; 
CString cstr; 
. float v; 

// write version number 
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// cscr = "# VERSION" 

// array. SetAtGrow (j -n-, cstr) ; 

sprintf (s, "%d" , BLOB_FILE_VERSION) ; 

array. SetAtGrow(j++, s) ; 

// output delay 
param = kDelay; 

GetPureStringValue (param, cstr) ; 
sscanf (cstr, "%f " , &v) ; 
if( v != 0. ) 
( 

// cstr = m_ParamNames [param] ; 
// array. SetAtGrow ( j ++ , cstr) ; 

sprintf (s, "%d",BLOCK_DELAY) ; 

array . SetAtGrow (j++ , s) ; 

cstr = "1"; 

array . SetAtGrow (j ++ , cstr); 
GetPureStringValue (param, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

) ' 

// output pre -gain 

param = kPreVolume; 
// cstr = m_ParamNames [param] ; 
// array. SetAtGrow (j++, cstr) ; 

sprintf ( s , " %d" , BLOCK_GAIN) ; 

array. SetAtGrow s) ; 

cstr = "1" ; 

array. SetAtGrow cstr) ,- 
GetPureStringValue (param, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

// lo- shelf 

if( !GetBypassSection(kBypassLoshelf ) ) 
. { 

// cstr = "Low-Shelf 11 ,• 

// array . SetAtGrow (j ++, cstr) ; 

sprint f ( s , " %d " , BLOCK_LS ) ; 

array. SetAtGrow (j++, s) 

cstr = "2" ; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kLoShelf Freq, cstr) 
array . SetAtGrow (j ++, cstr) ; 
GetPureStringValue (XLoShelfGain, cstr) 
array. SetAtGrow (j++, cstr); 

} 

// hi-shelf 

if( !GetBypassSection(kBypassHiShelf ) ) 
{ 

// cstr = "High-Shelf"; 

// array . SetAtGrow (j ++, cstr) ; 

sprintf (b, "%d",BLOCK_HS), • 

array. SetAtGrow (j++, s) ; 

cstr = "2"; 

array. SetAtG~rbw(j++, cstr); 
GetPureStringValue (kHiShelf Freq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kHiShelfGain, cstr) ; 
array. SetAtGrow (j++, cstr); 

} 

// low peaking cutoff 

if( ! GetBypassSection (kBypassHipass) ) 
{ 

// cstr = "Low Cutoff"; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_HP) ; 

array. SetAtGrow (j++, s) 

cstr = "2"; 

array . SetAtGrowf j++ , cstr) ; 
GetPureStringValue (kLoCutof f Freq, cstr) 



array . SetAtGrow (j +HB?str) ; 

GecPureStringValue (kLoCutof fQ, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

) 

// high peaking cutoff #1 

iff !GetBypassSection (kBypassLopass) ) 

( 

// cstr = "High Cutoff"; 

// array . SetAtGrow (j ++, cstr); 

sprintf (s, »%d" , BLOCK_LP) ; 

array . Se tAtGrow ( j + + , s ) ,- 

cstr = "2"; 

array . SetAtGrow (j ++, cstr); 
GetPureStringValue (kHiCutof f Freq, cstr) ; 
array . SetAtGrow (j ++ , cstr); 
GetPureStringValue (kHiCutof fQ, cstr) ; 
array. SetAtGrow(j++, cstr); 

} 

// high peaking cutoff #2 

if( !GetBypassSection (kBypassNLopass) ) 

{ 

// cstr = "High Cutoff #2"; 
// array . SetAtGrow (j ++, cstr); 

sprintf (s, "%d" , BL0CK_LP2) ; 

array. SetAtGrow (j++, s) ; 

cstr = "2"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kHiCutof f 2Freq, cstr) 
array. SetAtGrow (j++ , cstr) ; 
GetPureStringValue (kHiCutof f2Q, cstr) ; 
array . SetAtGrow (j ++ , cstr); 

) 

// resonance comp #1 

if( IGetBypassSection (kBypassNotchl) ) 
{ 

// cstr = "Parametric EQ" ; 

// array. Se tAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array . SetAtGrow(j ++, s) ,- 

cstr = "3"; 

array.SetAtGrow(j++, cstr) ; 
GetPureStringValue (kNotchlFreq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchlQ, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchlCut, cstr) ; 
array. SetAtGrow (j ++, cstr) ; 

} 

// resonance comp #2 

if( IGetBypassSection (kBypassNotch2) ) 
{ 

// cstr = "Parametric EQ"; 

// array. SetAtGrow cstr) ; 

sprintf (s, "%d" ,BLOCK_PEQ) ; 

array. SetAtGrow (j++, s) ; 

cstr = "3"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch2Freq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch2Q, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch2Cut, cstr) ; 
array. SetAtGrow cstr) ; 

} 

// resonance comp #3 

if( !GetBypassSection(kBypassNotch3) ) 
{ 



// cstr = "Parametril^^ 1 ; 

// array. SetAtGrow (j ++, cstr); 
sprint f (s, "%d" , BLOCK_PEQ) ; 
array. SetAtGrow (j++, s ) ; 
cstr = "3"; 

array. SetAtGrow cstr); 
GetPureStringValue (kNotch6Freq, cstr) ; 
array . SetAtGrow ( j ++ , cstr) ; 
GetPureStringValue (kNotch6Q, cstr) ,- 
array. SetAtGrow (j+ + , cstr); 
GetPureStringValue (kNotch6Cut , cstr) ; 
array. SetAtGrow (j++, cstr) ; 

} 

// resonance comp #4 

if( !GetBypassSection(kBypassNotch4) ) 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ; 

ar r ay . Se tAtGr ow ( j + + , s ) ; 

cstr = "3 " ; 

array. SetAtGrow cstr); 
GetPureStringValue (kNotch7Freq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch7Q, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotch7Cut, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

} 

/ / conecry 

if( !GetBypassSection(kBypassConecry) ) 

// cstr = "Parametric EQ"; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow (j++, s) ; 

cstr = "3"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (JcNotch3Freq, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotch3Q, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch3Cut , cstr) ; 
array. SetAtGrow (j++, cstr) ; 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow (j++, s) ; 

cstr = 11 3"; 

array.SetAtGrow(j++, cstr) ; 
GetPureStringValue (kNotch4Freq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue'(kNotch4Q, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotch4Cut, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

// cstr = "Parametric EQ"; 

// array.SetAtGrow(j+ + , cstr) ,- 

sprintf (s, "%d" , BLOCK_peq) ■ 

ar r ay . Se tAtGrow ( j + + , s ) ; 

cstr = "3" ; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSFreq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSQ, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSCut, cstr) ■ 
array. SetAtGrow (j++, cstr); 
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} 



// allpass 

if( !GetBypassSection(kBypassAllpass) ) 
{ 

// cstr = "Parametric EQ" ; 

// array. SetAtGrow (j ++, cstr) ; 

sprint f (s, "%d" , BLOCK_AP) ; 

array . SetAtGrow (j ++, s) ; 

cstr = "2"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kAllpassFreq, cstr) 
array . SetAtGrow (j ++, cstr); 
GetPureStringValue (kAllpassQ, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

) 

// double- tuned notch 

if( !GetBypassSection(kBypassDBNotch) ) 
{ 

// cstr = "Parametric EQ"; 

// array. SetAtGrow (j ++, cstr); 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow (j++, s) ,- 

cstr = "3"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSFreq, cstr) ; 
array. SetAtGrow (j++, cstr); 
GetPureStringValue (kNotchSQ, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSCut, cstr) ; 
array. SetAtGrow (j++, cstr) ; 

// cstr = "Parametric EQ"; 

// array. SetAtGrow (j+ + , cstr) ; 

sprintf (s, "%d" , BLOCK_PEQ) ; 

array. SetAtGrow (j ++, s) ; 

cstr = "3"; 

array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchSFreq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotch9Q, cstr) ; 
array. SetAtGrow (j++, cstr) ■ 
GetPureStringValue (kNotch9Cut, cstr) ; 
array . SetAtGrow (j ++ , cstr) ■ 

II cstr = "Parametric EQ"; 

// array. SetAtGrow (j++, cstr) ; 

sprintf (s , « %d" , BLOCK_PEQ) ; 

array. SetAtGrow s) ; 

cstr = "3"; 

array. SetAtGrow (j**, cstr) ,- 
GetPureStringValue (kNotchAFreq, cstr) ; 
array. SetAtGrow (j++, cstr) ; 
GetPureStringValue (kNotchAQ, cstr) ; 
array. SetAtGrow cstr) ; 
GetPureStringValue (kNotchACut, cstr) ; 
array . SetAtGrow (j ++ , cstr) ; 

} 

// output post -gain 

parara = kMainVolume; 
// cstr = m_ParamNames [param] ; 
// array. SetAtGrow (j++, cstr) ; 

sprintf (s, "%d" , BLOCK_GAIN) ; 

array. SetAtGrow (j++, s) ; 

cstr = "1"; 

array . SetAtGrow ( j ++ , cstr ) ; 
GetPureStringValue (param, cstr) ; 
array . SetAtGrow ( j ++ , cstr) ; 




void CDSP56kManager : : SetPreVolume (long value) 



double fvalue; 

if( value >= 0 ) 

SetRawValue (value , kPreVolume) ,- 
if( m_RawVals [kPreVolume] == DSP_CONTROL_MAX ) 

m_DSPVals (kDSPPreVolume] = -m_RawVals [kPreVolume] ; 
else if ( m_RawVals [kPreVolume] == 0 ) 

m_DSPVals [kDSPPreVolume] = 0; 
else 

{ 

fvalue = ra_RawVals [kPreVolume] ; 

fvalue /= DSP_CONTROL_MAX ; // normalize 

fvalue *= VOLRANGE; 

fvalue += VOLBOT; 

fvalue = (pow ( 10. . fvalue) - 1 . ) / (10 . -1 . ) ; 
fvalue *= DSP_CONTROL_MAX ; 

m_DSPVals [kDSPPreVolume] = (long) -fvalue; 

} 

SendDSPValue (kDSPPreVolume) ; 

} 

void CDSP56kManager : : SetAnalogVolume ( long value) 



double fvalue; 

if( value >= 0 ) 

SetRawValue (value, kAna log Volume) ; 
if( m_RawVals [kAna log Volume] == DS P_C0NTR0L_MAX ) 

m_DSPVals [kDSPAnalogVol] = -m_RawVals [kAnalogVolume] 
else if ( m_RawVals [kAnalogVolume] == 0 ) 

m_DSPVals [kDSPAnalogVol] = 0 ; 
else 

{ 

fvalue = m_RawVals [kAnalogVolume] ; 
fvalue /= DSP_CONTROL_MAX; // normalize 
fvalue *= VOLRANGE; 
fvalue += VOLBOT; 

fvalue = (pow ( 10. , fvalue) - 1 . ) / (10 . -1 . ) ; 
fvalue *= DSP_CONTROL_MAX; 

m_DSPVals [kDSPAnalogVol] = (long) -fvalue; 

} 

SendDSPValue (kDSPAnalogVol) ; 

) 



void CDSP56kManager : :SetBypass (long value) 
{ 

if ( value >= 0 ) 

SetRawValue (value, kBypass) ,- 
if( m_RawVals [kBypass] ) 

m_DSPVals [kDSPBypass] = 0X7FFFFF; 
elBe 

m_DSPVals [kDSPBypass] = 0; 
SendDSPValue (kDSPBypass) ; 

) 

void CDSP56kManager : : SetLoCutof f Freq ( long value) 



if( value >= 0 ) 

SetRawValue (value, kLoCutoff Freq) ,- 
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SetLoCutof f () ; 

) 

void CDSP56kManager: :SetLoCutof fQdong value) 

if (■ value >= 0 ) 

SetRawValue (value, kLoCutoffQ) ; 
SetLoCutof f () ; 

} 

yoid CDSP5GkManager: :SetHiCutof f Freq ( long value) 

iff value >= 0 ) 

SetRawValue (value , kHiCutof f Freq) ; 
SetHiCutoff () ; 

} ' 

void CDSP5 6kManager: : SetHiCutoff Q (long value) 

if( value >= o ) 

SetRawValue (value, kHiCutof fQ) ,- 
SetHiCutoff () ; 

} 

void CDSP56kManager: : SetHiCutoff 2Freq (long value) 

iff value >= o ) 

SetRawValue (value, kHiCutof f 2Freq) ; 
SetHiCutoff 2 () ; 

} 

yoid CDSP56kManager: : SetHiCutoff 2Q (long value) 

if( value >= o ) 

SetRawValue (value, kHiCutof f2Q) ; 
SetHiCutoff 2 () ; 

} 



void CDSP5 6kManager: :SetHiCutoff 0 
{ 

double f,q ; 
double al,a2,b0; 

q = ni_RawVais [kHiCutof fQ] ; - ' 
q /= DSP_CONTROL_MAX; // normalize 
q *= QLCRANGE; 
q += QLCBOTRANGE; 
q= (pow(10.,q) - l.)/(10.-l.) ; 
if( q >= 1. ) 
q = 0.99999; 

/*f = m_RawVals [kHiCutof f Freq] ,- 

f /= DSP_C0NTR0L_MAX; // normalize 

f *= FHCRANGE2; 

f += FHCB0TRANGE2 ; 

f = (pow(10.,f) - l.)/(10.-l.) ; */ 

I /= D S^PLrNG F F S^ 9e (m - RaWValS t^^toff Freq] . FHCTOPRANGE3 . FHCB0TRANGE3 ) 
f = 2. * sin( f * m_pi / 2 . ) ; 
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a2 = 1 . - f * q ; 
if( a2 >= 2. ) 

a2 = 1.99999; 
else if( a2 <= -2 

a2 = -1.99999; 
al = - (2 . - f * q 
if( al >= 2. ) 

al = 1.99999; 
else iff al <= -2 

al = -1.99999; 
bO = f * f / 2 . ; 
if( bO >= 8. ) 

bO = 7.99999; 
else if( bO < = -8 
bO = -7.99999; 

m_DSPVals [kDSPHiCutof fA2] = (long) (a2 * DSP_CONTROL_MAX/ 2 . ) ; 
SendDSPValue (kDSPHiCutof fA2) ; 

m_DSPVals [kDSPHiCutof fAl] = (long) (al * DSP_CONTROL_MAX/2 . ) ; 
SendDSPValue (kDSPHiCutof fAl) ; 

m_DSPVals [kDSPHiCutof f Scale] = (long) (bO * DSP_CONTROL_MAX/ 16 ) 
SendDSPValue (kDSPHiCutof f Scale) ; 

} 

void CDSP56kManager: : SetHiCutof f 2 ( ) 

double f,q; 

double al,a2,b0; 

double gamma, beta, lambda, alpha,- 

q = DSP_CONTROL_MAX - m_RawVals [kHiCutof f 2Q3 ; // invert scale 
q /= DSP_CONTROL_MAX; // normalize 

q *= (QHC2TOP-QHC2BOT) ; 
q += QHC2BOT; 

q= (pow(10.,q) - l.)/(10.-l.) ; 
// f = ConvertFreqRange (kHiCutof f2Freq) ; 

f = DoConvertFreqRange (m_RawVals [kHiCutof f2Freq] , FHC2TOP, FHC2BOT) 
f /= SAMPLING_FREQ/2 ; 

gamma = - cos(f * m_pi) ; 

beta = (1. - sin(f*m_pi/(2*q) ) )/(l. + sin (f *m_pi/ (2*q) ) ) ; 
if( beta > 2.0 ) 

beta =2.0; 
lambda =4. * beta * (gamma/ (1 . +beta) ) ; 
if( lambda > 2.0 ) 

lambda =2.0; 
alpha =1. + beta + lambda; 

a2 = beta; 
al = lambda; 
bO = alpha / 4 . ; 
if( bO >= 8. ) 

bO = 7.99999; - - - 

else if( bO <= -8. ) 

bO = -7.99999; 

m_DSPVals[kDSP2HiCutoffA2] = (long) (a2 * DSP_CONTROL MAX/ 2 . ) ; 
SendDSPValue (kDSP2HiCutoffA2) ; 

m_DSPVals[kDSP2HiCutoffAl] = (long) (al * DSP_CONTROL MAX/2.); 
SendDSPValue (kDSP2HiCutof fAl) ; 

m_DSPVals[kDSP2HiCutoffScale] = (long) (bO * DSP_CONTROL MAX/ 16.) 
SendDSPValue (kDSP2HiCutoff Scale) ,- 

) 

void CDSP56kManager : : SetLoCutof f ( ) 



double f ,q, scale_f actor; 



f) 
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:o^^ ; 




q = m_RawVals [kLoCutof 
q /= DSP_CONTROL_MAX; // normalize 
q *= QLCRANGE; 
q += QLCBOTRANGE ; 

q = (pow(10.,q) - l.)/(10.-l.) ; 
if( q >= 1. ) 

q = 0.99999; 
f = m_RawVals [kLoCutof f Freq] ; 
f /= DSP_CONTROL_MAX; // normalize 
f * = (FLCTOPRANGE2-FLCBOTRANGE2 ) ; 
f += FLCB0TRANGE2 ; 
f = (pow(10.,f) - l.)/(10.-l.) ; 
f / = SAMPLING_FREQ/2; 
f = 2. * sin{ f * m_pi II.); 
-iff f >= 1. ) 

f = 0.99999; 
scale_f actor = (4 . - 2 . * f * q - f * f ) /4 . ■ 

m_DSPVals [kDSPLoCutoff Fc] = (long) (f * DSP_C0NTR0L_MAX) ; 
SendDSPValue (kDSPLoCutof fFc) ; 

m_DSPVals [kDSPLoCutof fQc] = (long) (q * DSP_C0NTR0L_MAX) ; 
SendDSPValue (kDSPLoCutof fQc) ; - ' ' 

ra_DSPVals [kDSPLoCutof fScale] = (long) (-0.5 * scale_factor * DSP_CONTROL MAX) 
SendDSPValue (kDSPLoCutof fScale) ; 



void CDSP56kManager : : SetDDXCompBypass (long value) 

if( value >= 0 ) 

SetRawValue (value, kDDXCompBypass) ; 
if( m_RawVals [kDDXCompBypass] ) 

m_DSPVals [kDSPDDXCompBypass] = 0x7FFFFF; 
else 

m_DSPVals [kDSPDDXCompBypass] = 0; 
SendDSPValue (kDSPDDXCompBypass) ; 



} 

void CDSPS6kManager : : SetHDCDBypass (long value) 
( ' 

if ( value >= o ) 

SetRawValue (value, kHDCDBypass) ; 
if( m_RawVals [kHDCDBypass] ) 

m_DSPVals [kDSPHDCDBypass] = 0x7FFFFF ; 
else 

m_DSPVals [kDSPHDCDBypass] = 0; 
SendDSPValue (kDSPHDCDBypass) ; 



void CDSP56kManager: : SetHDCDGainScale (long value) 



if ( value >= 0 ) 

SetRawValue (value, kHDCDGainScaleOff) ; 
if ( m_RawVals [kHDCDGainScaleOff] ) 

m_DSPVals [kDSPHDCDGainScaleOff ] = 0X7FFFFF; 
else 

m_DSPVals [kDSPHDCDGainScaleOff ] = 0; 
SendDSPValue (kDSPHDCDGainScaleOff) ; 

} 

void CDSP56kManager : :ResetAll ( ) 
{ 
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lilt 1 ; 

for( i = o ; i < kUIArraySize ; i++ ) 

m_RawVals[i] = OX4 00000L- 
} 

for( i = 0 ; i < kDSPArraySize ; i++ ) 

m_DSPVals[i] = 0 ; 
) 

m_RawVals [kAnalogVolume] = OxBOOOOOL; 
m_RawVals [kMainVolume] = Ox800000L; 
m_RawVals [kPreVolume] = Ox800000L; 
m_RawVals [kBypass] = OxOOOOOOL; 
m_RawVals [kHDCDBypass] = OxOOOOOOL; 
m_RawVals [kDDXCompBypass] = OxOOOOOOL; 
m_RawVals [kHDCDGainScaleOff ] = OxOOOOOOL; 
m_RawVals [kAnalog'In] = OxOOOOOOL; 
m_RawVals [kDelay] = OxOOOOOOL; 

m_RawVals [kHiCutof f 2Freq] = 0x600000L; 
m_RawVals [kHiCutof f 2Q] = 0x200000L; 
m_RawVals (kHiCutof fFreq] = 0X60O0O0L; 
m_RawVals [kHiCutof fQ] = Ox200000L; 
m_RawVals [kLoCutof fFreq] = OX40000L; 
m_RawVals [kLoCutof fQ] = Ox200000L; 

m_DSPReturn = 0 ; 

for( i = o ; i < kUIArraySize ; i++ ) 
SetParamValue (-1, i) ; 



m_DSPVals[kDSPBypassMask] = m_RawVals [kBypassMask] =0L; 
SendDSPValue (kDSPBypassMask) ; 

} . 

void CDSPSSkManager : : SetNotch6Freq (long value) 
SetNotchFreq (value , kNotch6Freq) ; 



void CDSP56kManager: : SetNotchSQ (long value) 
SetNotchQ (value, kNotch6Q, kNotch6Freq) ; 



void CDSP56kManager: :SetNotch6Cut (long value) 
SetBoostCut (value, kNotch6Cut) ; 

} 

void CDSP56kManager: : SetNotch7Freq (long value) 
SetNotchFreq (value, kNotch7Freq) ; 



void CDSP56kManager: : SetNotch7Q (long value) 
SetNotchQ (value, kNotch7Q, kNotch7Freq) ; 



0040 
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void CDSP56kManager: : SetNotch7Cut (long value) 
SetBoostCut (value, kNotch7Cut) ; 

} 

int CDSP5SkManager : :GetHDCDMode () 
{ 

// SetParamValue(-l,kMainVolume) ,- 
// return ( m_D_SPReturn ) ; 

return ( m_Comm- >GetDetectState ( ) ) ; 

} 

void CDSP56kManager : : SetAnaloglnput (long value) 



iff value >= o ) * 
SetRawValue (value, kAnalogln) ; 

if( m_RawVals [kAnalogln] ) 

m_DSPVals [kDSPAnalogln] = 0X7FFFFF; 

else 

m_DSPVals [kDSPAnalogln] = 0; 
SendDSPValue (kDSPAnalogln) ; 



BOOL CDSP56kManager : : IsReady () 
return ( m_Comm->CheckState ( ) ) ; 

} 

void CDSP5 6kManager: :GetPureStringValue (int which, CString &str) 
int count; 

GetStringValue (which, str) , • 
str .TrimLef t () ; 
count = str. Find (' '); 
if ( count >= 0 ) 

str = str .Left (count) ,• 



void CDSPSSkManager: .-GetStringValue (int which, CString tstr) 
double value ,- 

"char s [100] ; " " 

switch ( which ) 
{ 

case kAnalogVolume : 
case kMainVolume : 
case kPreVolume: 

value = m_RawVals [which] ; 

value /= DSP_G0NTR0L_MAX; 

value = 20 * loglO (value) ; 

sprintf (s, "%l0.2f dB", value); 

str = s; 

break; 
case kHiCtitof fFreq: 

/* value = m_RawVals [which] ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= FHCRANGE2; 
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value += FHCBOTF 

value = (powdo. .value) - l . ) / (10 . -l . ) 
value *= SAMPLING_FREQ/2; */ 

value = DoConvertFreqRange(m_RawVals [kHiCutof f Freq] , FHCTOPRANGE3 , FHCBOTRANGE3 ) 
sprintf (s, "%10.2f Hz", value); 
str = S; 
break; 
case kHiCutoff2Q: 

value = DSP_CONTROL_MAX - m_RawVals [kHiCutof f2Q] '; 
value /= DSP_CONTROL_MAX; // normalize 
value *= QHC2TOP-QHC2BOT; 
value += QHC2B0T; 

value = (pow(10. .value) - 1 . ) / (10 . -l . ) ■ 
sprintf (s, "%10 . 2f" , value) ; 
str = S; 
break; 
case kHiCutof fQ: 

value = m_RawVals [kHiCutof fQ] ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= QLCRANGE; 

value += QLCBOTRANGE ; 

value = (pow(10. , value) - 1. ) / (10 . -i. ) ; 
if( value >= 1. ) 

value = 0.99999; 
sprintf (s, "%10 .2f " .value) ; 
str = S; 
break; 
case kLoCutof f Freq: 

value = ra_RawVals [kLoCutof f Freq] ; 
value /= DSP_CONTROL_MAX; // normalize 
value *= ( FLCTOPRANGE2 - FLCBOTRANGE2 ) ; 
value += FLCBOTRANGE2 ; 

value = (powdo. .value) - 1 . ) / (10 . -1 . ) ; 
sprintf (s, "%10.2f Hz", value); 
str = s; 
break; 
case kLoCutof fQ: 

value = m_RawVals [kLoCutof fQ] ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= QLCRANGE; 

value += QLCBOTRANGE; 

value = (pow(10. .value) - 1 . ) / (10 . -1 . ) ; 
if( value >= l. ) 

value = 0.99999; 
sprintf (s, "%10.2f", value) ; 
str = s; 
break; 
case kLoShelfFreq: 

value = m_RawVals [kLoShelfFreq] 

value /= DSP_CONTROL_MAX; // normalize 

value *= FLCRANGE; 

value ■*-= FLCBGTRANGE; 

value = (pow(10. , value) - 1 . ) / do . -1 . ) ; 
value *= SAMPLING_FREQ/2; 
sprintf (s,"%10.2f Hz", value); 
" str -=■ s ; " " , • ' " — 

break; 
case kHiShelfFreq: 

value = m_RawVals [kHiShelfFreq] ; 

value /= DSP_CONTROL_MAX; // normalize 

value *= FHCRANGE2; 

value += FHCBOTRANGE2 ; 

value = (powdo. .value) - 1 . ) / (10 . -1 . ) ; 

value *= SAMPLING_FREQ/2; 

sprintf (s, "%lo.2f Hz" .value) ; 

str = s ; 

break; 
case kNotchlCut 
case kNotch2Cut 
case kNotch3Cut 
case kNotch4Cut 
case kNotchSCut 
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case kNotch6Cut : 
case kNotch7Cut : 
case kNotch8Cut: 
case kNotch9Cut: 
case kNotchACut: 
case kLoShelfGain: 
case kHiShelfGain: 

value = 20 * ConvertBoostCutRange (m_RawVals [which] ) ; 

sprintf (s, "%10.2f dB", value); 

str = s; 

break; 
case kNotchlFreq: 
case kNotch2Freq: 
case kNotch3Freq: 
case kNotch4Freq: 
case kNotchSFreq: 
case kNotchSFreq: 
case kNotch7Freq: 
case kNotchSFreq: 
case kNotch9Freq: 
case kNotchAFreq: 
case kAllpassFreq: 

value = ConvertFreqRange (which) ; 

value *= SAMPLING_FREQ/2 ; 

sprintf (s, »%10.2f Hz", value); 

str = s; 

break; 
case kHiCutoff 2Freq: 

value = DoConvertFreqRange (m_RawVals [kHiCutoff 2Freq] , FHC2TOP, FHC2BOT) 

sprintf (s, "%10.2f Hz", value); 

str = S; - 
break; 



case 


kNotchlQ: 


case 


kNotch2Q: 


case 


kNotch3Q: 


case 


kNotch4Q: 


case 


kNotch5Q: 


case 


kNotchSQ: 


case 


kNotch7Q: 


case 


kNotch8Q: 


case 


kNotch9Q : 


case 


kNotchAQ : 


case 


kAllpassQ 



value = ConvertQRange (m_RawVals [which] ) ; 
. sprintf (s, "%10.2f", value) ; 

str = s; 

break; 
case kDelay: 

value = m_RawVals [which] ; 

value /= DSP_CONTROL_MAX; 

value *= DELAY_LENGTH; 

value /= SAMPLING_FREQ; 

value *= 1000 . ; 

sprintf (s, "%10 . 2f mS", value); 

str = S; 

break; 
default: 

str = "fixed"; 

break; 

} 

) 

BOOL CDSP56kManager: : IsBusyO 
{ 

return( m^Comm-^IsTransmitting ( ) ) ; 

) 

void CDSP56kManager : : SetBypassSection (BOOL value, int which) 
{ 
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long mask = 1L << which; 
if( value ) 

m_RawVals [kBypassMask] |= mask; 

} 

else 
{ 

mask = -mask; 

m_RawVals [kBypassMask] &= mask; 

ra DSPVals [kDSPBypassMask] = m_RawVals [kBypassMask] 
SendDSPValue (kDSPBypassMask) ; 

} 

BOOL CDSP56kManager : :GetBypassSection ( int which) 
{ 

long mask = 1L << which; 

return! (m_RawVals [kBypassMask] & mask) != 0 ); 

} 

void CDSP5 6kManager: :SetDelay (long value) 
{ 

if( value >= 0 ) 

, SetRawValue (value , kDelay ) ; 
m_DSPVals [kDSPDelay] = m_RawVals [kDelay] ; 
SendDSPValue (kDSPDelay) ; 



} 



// UI IDs 
enum { 

kMainVolume, 
kLoShelf Freq, 
kLoShelf Gain, 
kHiShelfFreq, 
kHiShelfGain, 
kNotchlFreq, 
kNotchlQ, 
kNotchlCut, 
kNotch2Freq, 
kNotch2Q, 
kNotch2Cut, 
kNotch3Freq, 
kNotch3Q, 
kNotch3Cut, 
kNotch4Freq, 
kNotch4Q, 
kNotch4Cut, 
kNotch5Freq, 
kNotchSQ, 
kNotchSCut, 
kPreVolume, 
kBypass, 
kLoCutof f Freq, 
kLoCutof fQ, 
kHiCutof fFreq, 
kHiCutof fQ, 
kHDCDByp ass, 
kHDCDGainScaleOf f , 
kDDXCompBypas s , 
kNotch6Freq, 
kNotch6Q , 
kNotch6Cut , 
kNotch7Freq, 
kNotch7Q, 
kNotch7Cut, 
kAnalogln, 
kAnalogVolume , 
kDelay, 
kAllpassFreq, 
kAllpassQ, 
kBypassMask, 
kHiCutoff2Freq, 
kHiCutoff2Q, 
kNotch8Freq, 
kNotch8Q, 
kNotch8Cut, 
kNotch9Freq, 
kNotch9Q, 
kNotch9Cut, 
kNotchAFreq, 
kNotchAQ, 
kNotchACut , 
- -kDBNotehWidth - 



((define kUIArraySize (kDBNotchWidth+1) 

// orphaned control IDs 

((define kNotchSFreq (10000+20) 
#define kNotch6Q (10000+21) 
((define kNotchSBoost (10000+22) 
#define kNotch7Freq (10000+23) 
((define kNotch7Q (10000+24) 
#define kNotch7Boost (10000+25) 
((define kLoShelf 2Freq (10000+26) 
((define kLoShelf 2Boost (10000+27) 
((define kHiShelf 2Freq (10000+28) 
ftdefine kHiShelf 2Boost (10000+29) 



*/ 



II DSP IDs 
enum { 

kDSPMainVolume , 

kDSPLoShe 1 f Fr eq , 

kDSPLoShe 1 f Ga in , 

kDSPHiShelfFreq, 

kDSPHiShelfGain, 

kDSPNotchlFreq, 

kDSPNotchlQ, 

kDSPNotchlCut, 

kDSPNotch2Freq, 

kDSPNotch2Q, 

kDSPNotch2Cut, 

kDSPNotch3Freq, 

kDSPNotch3Q, 

kDSPNotch3Cut, 

kDSPNotch4Freq, 

kDSPNotch4Q, ■ 

kDSPNotch4Cut, 

kDSPNotch5Freq, 

kDSPNotch5Q, 

kDSPNotch5Gut, 

kDSPPreVolume, 

kDSPBypass, 

kDSPLoCutoff Scale , 

kDSPLoCutoffFc, 

kDSPLoCutoffQc, 

kDSPHiCutoff Scale, 

kDSPHiCutoffA2, 

kDSPHiCutoffAl, 

kDSPHDCD Bypass , 

kDSPHDCDGainScaleOf f ,' 

kDSPDDXCompBypass , 

kDSPNotch6Freq, 

kDSPNotchSQ, 

kDSPNotchSCut , 

kDSPNotch7Freq, 

kDSPNotch7Q, 

kDSPNotch7Cut, 

kDSPAnalogln, 

kDSPAnalogVol, 

kDSPBypassMask, 

kDSPDelay, 

kDSPAl lpassFreq, 

kDSPAllpassQ, 

kDSP2HiCutoff Scale , 

kDSP2HiCutoffA2, 

kDSP2HiCutoffAl, 

kDSPNotch8Freq, 

kDSPNotch8Q, 

kDSPNotch8Cut, 

kDSPNotch9Freq, 

kDSPNotch9Q, 

kDSPNotch9Cut, 

kDSPNotchAFreq, 

kDSPNotchAQ, 

kDSPNotchACut 



#define kDSPArraySize (kDSPNotchACut+1) 

// bit definitions for kDSPBypassMask above 
enum { 

kBypassNotchl, 

kBypassNotch2, 

kBypassNotch3 , 

kBypassNotch4 , 

kBypassHipass , 

kBypassLopass, 

kBypassLoshelf , 



kBypassHiShelf, 
kBypas sConecry , 
kBypassAHpass , 
kBypassDBNotch, 
kBypas sNLopass 
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ffif ! defined (AFX DBN0TC1 




r 241CC3C5 14D9 11D3 96EE 006097CDB9E2 




r LUDED_) 



Kdef ine AFX_DBNOTCH_H 2 41CC3C5_14D9_11D3_96EE_006097CDB9E2 INCLUDED 

ffif _MSC_VER >= 1000 
((pragma once 

#endif // _MSC_VER >= 1000 
// DBNotch.h : header file 



1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 



II CDBNotch dialog 

class CDBNotch : public CPropertyPage 
{ 

DECLARE_DYNCREATE (CDBNotch) 

// Construction 
public : 

CDBNotch ( ) ; 

-CDBNotch () ; 

// Dialog Data 

// { {AFX_DATA (CDBNotch) 
enum { IDD = IDD_PP11 } ; 
CButton m_Bypass; 
CSliderCtrl m_CompGainSlider ; 
CSliderCtrl m_CompQSlider ; 
CSliderCtrl m_QSlider; 
CSliderCtrl m_FreqSlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

//{ (AFX_VIRTUAL (CDBNotch) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

// { (AFX_MSG (CDBNotch) 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 

af x_ms'g void OnPaint ( ) ; 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnBypassO ; 

//}}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI ( int which); 



// { {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_DBNOTCH H 241CC3C5 14D9 11D3 96EE 006097CDB9E2 INCLUDED ) 



// 



class CTabDialog; 



}; 



l 
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// 
// 



DBNotch.cpp : impletw 



on file 



ffinclude "stdafx.h" 
ffinclude "sa.h" 
#include "DBNotch.h" 
#include "TabDialog.h" 
'ffinclude "DSP56kManager .h" 



#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[] = FILE ; 

#endif 

////////////////////////////////////////////////////////////////>/ A////////// 
// CDBNotch property page 

IMPLEMENT_DYNCREATE (CDBNotch, CPropertyPage) 

CDBNotch: : CDBNotch () : CPropertyPage (CDBNotch :: IDD) 

//{ (AFX_DATA_INIT (CDBNotch) 

// NOTE: the ClassWizard will add member initialization here 
//) )AFX_DATA_INIT 

} 



CDBNotch : : -CDBNotch ( ) 

( 

} 

void CDBNotch: : DoDataExchange (CDataExchange*. pDX) 

CPropertyPage: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CDBNotch) 
DDX_Control(pDX, IDC_CHECK5, m_Bypass) ; 
DDX_Control (pDX, IDC_SLIDER6, m_CompGainSlider) ; 
DDX_Control (pDX, IDC_SLIDER5, m_CompQSlider) ; 
DDX_Control (pDX, IDC_SLIDER2 , m_QSlider) ; 
DDX_Control (pDX, IDC_SLIDER1 , m_FreqSlider) ; 
// ) } AFX_DATA_MAP 

} 



BEGIN_MESSAGE_ i _MAP (CDBNotch, CPropertyPage) 
//{{AFX_MSG_MAP (CDBNotch) 
ON_WM_VSCROLL ( ) 
ON_WM_PAINT ( ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypass) 
//}}AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1/ 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 // 1 / 1 / 1 1 1 1 1 1 / 1 / 
II CDBNotch message handlers 

void CDBNotch: :OnVScroll(UINT nSBCode, UINT- nPos,- CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *)pScrollBar; 
int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar) ; 
Sleep (50) ,- 

if( slider == &m_FreqSlider ) 

which = kNotch9Freq,- 
else if( slider == &m_QSlider ) 

which = kNotch9Q; 
else iff slider == &m_CompQSlider ) 

which = kNotch8Q; 
else if( slider == &m_CompGainSlide'r ) 

which = kNotchBCut; 
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g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos () , which) • 
SendStringToUI (which) ; 



void CDBNotch: .-OnPaint () 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_FreqSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch9Freq) ) - 
m_QSlider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch9Q) ) ; 
m_CompQSlider. SetPos (C0NTROL_RANGE-g_DSPManager- >GetParamValue (kNotchSQ) ) ; 
m_CompGainSlider. SetPos (CONTROL_RANGE-g_DSPKanager- >GetParamValue (kNotch8Cut) ) 

m_Bypass.SetCheck(g_DSPManager->GetBypassSection(kBypassDBNotch) ) ; 
// Do not call CPropertyPage :: OnPaint ( ) for painting messages 



BOOL CDBNotch: : OnlnitDialog ( ) 

CPropertyPage: : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_FreqS 1 ider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_FreqSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchSFreq) ) ; 
m_FreqSlider. SetTicFreq ( (CONTROL_RANGE+l) /16) ; 
m_QSlider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_QSlider. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
m_QSlider.SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_CompQSlider . SetRange ( 0 , CONTROL_RANGE) ; 

ra_Com P QSlider. SetPos (C0NTR'OL_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
m_CompQSlider . SetTicFreq ( (C0NTR0L_RANGE+1) /16) ; 
m_CompGainSlider . SetRange (0 , CONTROL_RANGE) ; 

m_CompGainSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchBCut) ) 
m_CompGainSlider. SetTicFreq ( (C0NTR0L_RANGE+1) /1G) ; 



m_ParentWindow = (CTabDialog *) GetParent () ->GetParent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 



void CDBNotch: : SendStringToUI (int which) 



CString str; 

g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString (0, str) ; 



void CDBNotch: :OnBypass () 



// TODO: Add your control notification handler code he: 
int state = m_Bypass .GetState () & 0x3; 



re 



g_DSPManager- >SetBypassSection (state , kBypassDBNotch) ; 



// MainPage.cpp : impletflBKtion file 
// 

ffinclude "stdafx.h" 
# include "sa.h" 
#include "MainPage . h" 

ffinclude "TabDialog .h" 
ffinclude "DSP5 6kManager .h" 
ffinclude <stdlib.h> 

ffifdef _DEBUG 
ffdefine new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[] = FILE ; 

ffendif 

iiiiiiiiiiiiiiiiiiiiiiiiiiiuiiiifiiim/iiiiiiiiiiiiiniiiiiiiiii/iiiiiiiui 

1 1 CMainPage property page 

IMPLEMENT_DYNCREATE (CMainPage, CPropertyPage) 
CMainPage: : CMainPage () : CPropertyPage (CMainPage : : IDD) 

//{ {AFX_DATA_INIT (CMainPage) 
m_BypassCheckBox = FALSE; 
m_HDCDBypass = FALSE; 
m_GainScaleBypass = FALSE; 
m_AnalogInput = FALSE; 
// } } AFX_DATA_INIT 




CMainPage : : -CMainPage ( ) 



void CMainPage: :DoDataExchange (CDataExchange* pDX) 

CPropertyPage : : DoDataExchange (pDX) > 
// { { AFX_DATA_MAP ( CMainPage ) 
DDX_Control (pDX, IDC_SLIDER8, m_Delay) ; 

IDC_SLIDER7, m_AnalogVpl) ; 
IDC_BUTT0N1, m_ResetAll) ; 
IDC_SLIDER3, m_PreVolumeSlider ) , 
IDC_SLIDER1, m_VoluraeSlider) ; 
DDX_Check(pDX, IDC_CHECK1, m_BypassCheckBox) ; 
DDX_Check(pDX, IDC_CHECK2, m_HDCDBypass) ; 
DDX_Check(pDX, IDC_CHECK3, m_GainScaleBypass) ; 
DDX_Check(pDX, IDC_CHECK4, m_AnalogInput) ; 
/ / } } AFX_DATA_MAP 



DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control(pDX, 
DDX_Control (pDX, 



BEGIN_MESSAGE_MAP ("CMainPage , 
// { { AFX_MSG_MAP ( CMainPage) 
ON_WM_VSCROLL ( ) 
ON_WMjSHOWWINDOW ( ) 
ON_BN_CLICKED ( IDC_CHECK1 , 
ON_WM_PAINT ( ) 
ON_BN_CLICKED ( IDC_CHECK2 , 
ON_BN_CL I C KE D ( IDC_CHECK3 , 
ON_BN_CLICKED ( IDC_BUTTONl , 
ON_BN_CLICKED ( IDC_CHECK4 , 
//} }AFX_MSG_MAP 

END_MES SAGE MAP ( ) 



CPropertyPage ) 



OnBypassButton) 

OnHDCDBypass) 
OnGainScaleBypass) 

OnResetAll) 
OnAnaloglnput ) 



I f 1 1 1 1 1 J 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 

I I CMainPage message handlers 

void CMainPage: :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 



1 




// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar ; 
int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep(50).; 

if ( slider == &m_VolumeSlider) 

which = kMainVolume ; 
else if (slider- == &m_PreVolumeSlider> 

which = kPreVolume; 
else if (slider == &m_AnalogVol) 

which = kAnalogVolume; 
else if -(slider == &m_Delay) 

which = kDelay; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE-slider->GetPos ( ) , which) ; 
Sends tringToUI (which) ; 

} 

BOOL CMainPage .- : OnlnitDialog ( ) 
{ 

CPropertyPage: : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_VolumeSlider . SetRange ( 0 , CONTROL_RANGE ) ; 

ra_VolumeSlider.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kMainVolurae) ) ; 
m_VolumeSlider. SetTicFreq! (CONTROL_RANGE+l) /IS) ; 
m_VolumeSlider . SetPageSize ( PG_CONTROL_AMT) ; 

m_PreVolumeSlider . SetRange ( 0 , CONTROL_RANGE) ; 

ra_PreVolumeSlider.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kPreVolume) ) 
m_PreVolumeSlider .SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_PreVolumeSlider .SetPageSize (PG_CONTROL_AMT) ; 

m_AnalogVol . SetRange ( 0 , CONTROL_RANGE) ; 

m_AnalogVol. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kAnalogVolume) ) ; 
m_AnalogVol . SetTicFreq ( ( CONTROL_RANGE+l ) /16) ; 
m_AnalogVol. SetPageSize (PG_CONTROL_AMT) ; 

m_Delay . SetRange ( 0 , CONTROL_RANGE) ; 

m_Delay . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kAnalogVolume) ) ; 
m_Delay. SetTicFreq ( (CONTROL_RANGE+l) /16) ; 
m_Delay. SetPageSize (PG_CONTROL_AMT) ; 

m_BypassCheckBox = false; 

m_ParentWindow = (CTabDialog *) Ge t Par ent () ->Get Parent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
^ // EXCEPTION: OCX Property Pages should return FALSE 

void CMainPage: : OnShowWindow ( BOOL bShow, UINT nStatus) 
CPropertyPage: : OnShowWindow (bShow, nStatus) ; 
// TODO: Add your message handler code here 

) 



void CMainPage: : OnBypassButton () 
{ 

// TODO: Add your control notification handler code here 
"l-EypassCheckBox = !m_BypassCheckBox; 
g_DSPManager->SetBypass (m_BypassCheckBox) ; 

} 

void CMainPage : :OnPaint ( ) 
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CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_VolumeSlider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kMainVolume) ) ; 
m_PreVolumeSlider.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kPreVolume) ) ; 
m_AnalogVol.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kAnalogVolume) ) ; 
m_De lay. SetPos (C0NTROL_RANGE-g_DSPManager- >GetParamValue (kDelay) ) ; 

// Do not call CPropertyPage: :OnPaint () for painting messages 



void CMainPage: : OnHDCDBypass () 
{ 

// TODO: Add your control notification handler code here 
m_HDCDBypass = ! m_H DCDBypa s s ; 
g_DSPManager->SetHDCDBypass (m_HDCDBypass) ; 

} 

void CMainPage: :OnGainScaleBypass ( ) 

// TODO: Add your control notification handler code here 
m_GainScaleBypass = lm_GainScaleBypass; 
g_DSPManager->SetHDCDGainScale (m_GainScaleBypass ) ; 

} 

void CMainPage: :OnResetAll() 
{ 

// TODO: Add your control notification handler code here 
//MM 8/3/99 Added extra dialog warning. 

if( MessageBoxC'Are you sure you want to reset all parameters? ", "WARNING" , MB YESNO) != I DYES ) 

return; — 
g_DSPManager- >ResetAl 1 ( ) ■ 

m_VolumeSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kMainVolume) ) ; 
m_PreVolumeSlider. SetPos (CONTR0L_RANGE-g_DSPManager->GetParamValue (kPreVolume) ) ; 
m_AnalogVol . SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue (kAnalogVolume) ) ; 
m_Delay. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kDelay)) ; 



void CMainPage : : OnAnaloglnput ( ) 

// TODO: Add your control notification handler code here 
m_AnalogInput = !m_AnalogInput; 
g_DSPManager->SetAnalogInput (ra_AnalogInput) ; 



void CMainPage: : SendStringToUI (int which) 
CString str; 

g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString ( 0 , str) ; 
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#if !def ined <AFX_MAINPAG^r_904 S3 DA4_D52E_llD2_96EE_006097CDB9E2^!cLUDED ) 
#defzne AFX_MAINPAGE_H_90463DA4_DS2E_11D2_96EE_OOG097CDB9E2 INCLUDED 



#if _MSC_VER >= 100 0 
Spragma once 
#endif 

// _MSC_VER >= 1000 

// MainPage.h : header file 

// 



class CTabDialog; 
/"cMa^age'd^^ 

class CMainPage :■ public CPropertyPage 

DECLARE_DYNCREATE (CMainPage) 

// Construction 
public: 

CMainPage ( ) ; 

-CMainPage { ) ; 

// Dialog Data 

// { {AFX_DATA (CMainPage) 
enum { IDD = IDD_PP2 } ; 
CSliderCtrl m_Delay ; 
CSliderCtrl m_AnalogVol; 
CButton m_ResetAll; 
CSliderCtrl m_PreVolumeSlider ; 
CSliderCtrl m^VolumeSlider; 
BOOL m_BypassCheckBox; 
BOOL m_HDCDBypass; . 
BOOL m_GainScaleBypass; 
BOOL m_AnalogInput ; 
//} )AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAL (CMainPage) 

protected: 

//RaFX ^^ DataEXChan 9 e(CDataExchan 9^ PCX) ; // DDX/DDV support 

/ / Implementation 
protected: 

/ / Generated message map functions 

//{ {AFX_MSG (CMainPage) 

afx_msg void OnVScroll (UINT nSBCode. UINT nPos, CScrollBar* pScrollBar) 
virtual BOOL OnlnitDialogO ; 

afx_msg void OnShowWindow ( BOOL bShow, UINT nStatus) ; 

afx_msg void OnBypassButtcn ( ) ; 

af x_msg void OnPaint ( ) ; 

afx_msg void OnHDCDBypass () ; 

afx_msg void OnGainScaleBypass ( ) ; 

afx_msg void OnResetAlK) ; 

af x_msg void OnAnaloglnput ( ) ; 

//}}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI (int which); 

private: 
}; 

//{ {AFX_INSERT_LOCATION} } 
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// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_MAINPAGE_H_904 63DA4_D52E_11D2_96EE_006097CDB9E2_INCLUDED_) 
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// I2CIPortComm.h: interface for the I2CIPortComm class. 
// 

////////////////////////////////////////////////////////////////////// 

ftif !def ined(AFX_I2CIPORTCOMM_H 3 3F9EF07_F6EF_11D2_96EE_006097CDB9E2 INCLUDED 

ffdefine AFX_I2CIPORTCOMM_H 33F9EF07_F6EF_11D2_96EE_006097CDB9E2. INCLUDED_ 

#if _MSC_VER >= 1000 
(fpragma once 

Sendif // _MSC_VER >= 1000 
S include "DSPComm.h" 



enura { 

MI2C_STATE_CLOSED , 

M 1 2 C_STATE_PEND ING_OPEN , 

MI2C_STATE_OPEN, 

MI2C_STATE_PENDING_TX, 

MI2C STATE PENDING RX 



#define MI2_BUFFER_SIZE (3*3000) // should be multiple of 3 

class I2CIPortComm : public DSPComm 





int 


m_state; 






int 


m_error__code ; 






long 


m_TxReq ; 






char 


ra_tx_buf fer [MI2_ 


_BUFFER_SIZE] 




long 


m_tx_write , m_tx_ 


read; 




long 


ra_detect; 






BOOL 


m_get_detect ; 






long 


m_re t ryCount ; 






BOOL 


m_initialTry; 






HWND 


ra_HWnd; 





public: 

virtual BOOL IsTransraitting (void) ; 

virtual long GetDetectState (void) ; 

virtual void MessageHandler (WPARAM iPortEventCode) ; 

virtual BOOL CheckState (void) ; 

I2CIPortCoram(HWND p) ; 

virtual -I2CIPortComm() ; 

virtual long SendDSPWord (long) ; 

virtual long SendDSPMemory (char *,long); 

■)> ' ' 

#endif // !def ined (AFX_I2CIPORTCOMM_H_33F9EF07_FSEF_11D2_96EE_006097CDB9E2 INCLUDED_) 



1 



0058 



// I2CIPortComm.cpp: implementation of the I2CIPortComm class. 
// 

iiiiiiuiiiiiiiimiiiii mum iniiiii/iiiii mini iiiiiiiiuimiii 



Sinclude "stdafx.h" 

ft include "sa.h" 

jfincliide n I2CIPortComm.h" 

Sinclude "COMPortChooser . h" 

jfinclude "i2c2 00.h" 

static struct I2C_PR0P i2c; 

static I2CIPortComm *g_I2CComm = NULL; 



((define I2C_SLAVE_ADDRESS OxBO 
#define I2C_MAX_AMOUNT (5*3) 
Sdefine I2C RETRY_COUNT 0 



// don't send more than this in one-shot 



tfifdef _DEBUG 

#undef THIS_FILE 

static char THIS_FILE [] < 

Sdefine new DEBUG_NEW 

ftendif 



FILE 



//static int cb_message; 

void iPortMsgHandler (WPARAM iPortEventCode) 
{ 



if( g_I2CComm ) 

g_I2CComm->MessageHandler (iPortEventCode) 



1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 'III II III 
II Construction/Destruction 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 
/*static BOOL wait_f or_message (void) 

{ 

long count; 

while ( cb_message == -1 ) 
{ 

Sleep(lOO) ; 
count++; 

if( count > 20 ) - 
return ( false ) ; 

} 

return ( true ) ; 
}*/ 

I2CIPortComm: :I2CIPortComm(HWND p) 
{ 

int r; 

CCOMPortChooser dig; 

dig . DoModal ( ) ; 

m_error_code = 0 ; 

m_state = MI2C_STATE_CL0SED; 

ra_TxReq = 0 ; 

m_tx_write = m_tx_read =0; 
m_detect = 0; 
m_get_detect = false; 
m_initialTry = false; 
m_HWnd - p; 



i2c . comport 



= dig . which_port ,- 



i2c.WmMsgNo = 




i2c.pfCBF = iPortMsgHandler ; 
tfifdef NDEBUG 

i2c.pcLogFileName = NULL; 
Seise 

i2c .pcLogFileName = "log.txt"; 
Sendif 

i2c.LogFileLevel = 1; 
i2c.LogFileSize = 1000; 
i2c.HostSlaveAddr = 0x6E; 
i2c.BusTime0ut = 1000; 
i2c.MasterBitRate =2; // 100 kHz 

i2c.MasterRxBufSize = 512; 
i2c.MasterTxBufSi2e = _MI2_BUFFER_SIZE; 
i2c .MasterArbRetry = 0; 
i2c.SlaveRxGCEnable = 1; 
i2c.SlaveRxBufSize = 512; 
i2c.SlaveTxBufSize = 512; 

r = I2COpen(m_KWnd,AfxGetInstanceHandle () , &i2c) ; 
iff r ) 

m_error_code = 0x1000; 
m_state = MI2C_STATE_PEKDING_OPEN; 
g_I2CComra = this; 

} 

I2CIPortComm: : -I2CIPortComm( ) 
{ 

I2CClose() ; 
g_I2CComm = NULL; 

} 

long I2CIPortComm: : SendDSPWord (long value) 
{ 

char buffer [3] ; 

iff m_state < MI2C_STATE_OPEN ) 
return ( 0L ) ; 

buffer [0] = (value >> 16) & OxFF; 
buffer [1] = (value >> 8) & OxFF; 
buffer [2] = value & OxFF; 
return! SendDSPMemory (buffer, 3) ); 

} 

long I2CIPortComm: : SendDSPMemory (char *data, long len) 

// make sure the link is valid 
if ( m_state < MI2C_STATE_OPEN ) 
return ( 0L ) ; 

long rval = 0L; 
long b; 

long tocopy , amount , f reespace ; 

// copy data into the tx buffer 

iff data ) 

{ 

f reespace = m_tx_read - m_tx_write; 
if ( f reespace <= 0 ) 

f reespace += MI2_BUFFER_SIZE; 
ASSERT ( (len + 3) <= freespace ); // not enough space in the buffer 

for( tocopy = len ; tocopy > 0 ; tocopy -= amount ) 

if ( m_tx_write >= m_tx read ) 
{ 
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# • 

amount = MI2_T^^ER_SIZE - m_tx_write; 

else 
{ 

amount = m_tx_read - m tx write; 

) 

amount = min (amount, tocopy) ; 

memcpy (m_tx_buf f er+m_tx_write, data, amount) ; 

data += amount; 

m_tx_write += amount ; 

m_tx_write %= MI2_BUFFER_SIZE; 

} 

} 

// attempt to send it 

if ( m_state == MI2C_STATE_OPEN ) 

{ 

amount = m_tx_write - m_tx_read; 
// ASSERT ( amount == ((amount / 3) * 3) ),- 

if ( amount < 0 ) 

amount = MI2_BUFFER_SIZE - m_tx_read; 
// amount = (amount / 3) * 3; // Send complete DSP Words. 

amount = min (amount, I2C_MAX_AMOUNT) ; // throttle 

b = I2CMasterTx(I2C_SLAVE_ADDRESS, (unsigned char *) m_tx_buf f er+m tx read , amount 1) 
if ( b == 0 ) 
{ 

m_State = MI2C_STATE_PENDING_TX; 
m_TxReq = amount; 
if ( !m_initialTry ) 
{ 

m_retryCount = 0; 
m_initialTry = true; 

} 

. 1 
else 

{ 

if( m_error_code == 0 ) 

m_error_code = b; 
ASSERT (b == 0) ,- 

} 

} 

return ( rval ) ; 



void I2CIPortComm: tMessageHandler (WPARAM iPortEventCode) 
{ 

struct I2C_PROP si2c; 
int r; 

long tx_count; 
long val; 

unsigned char buffer[10]; 

switch ( m_state ) 
{ 

case MI2C_STATE_PENDING_OPEN: 

if( iPortEventCode == I2C OPEN SUCCESSFUL ) 
{ 

m_state = MI2C_STATE_OPEN; 
if ( m_tx_read ! = m_tx_write ) 
SendDSPMemory (NULL, 0L) ; 

) 

else 

m_error_code = iPortEventCode; 
break; 

ft 

case MI2C_STATE_PENDING_RX: 

if( iPortEventCode == I2C MRX COMPLETE ) 

{ . 

r = I2CGetMasterRxMsg (3 , buffer) ■ 
if( r == 3 ) 




val = buffer [0] & OxFF; 
val << 8; 

val = val | (buffer [1] & OxFF) ; 
val << 8; 

val = val | (buffer [2] & OxFF) ; 
m_detect = val; 

} 

} 

//else 

// ra_error_code = iPortEventCode; 
m_state = MI2C_STATE_OPEN; 
if( m_tx_read != m_Cx_write ) 

SendDSPMemory {NULL, 0L) ; 
break; 

case MI2C_STAtE_PENDING_TX: 

if( iPortEventCode == I2C_MTX_COMPLETE ) 
{ 

// MM 5/20/99 Don't call status here. 
// r = I2CGetStatus(&si2c) ; 

// tx_count = si2c.MasterTxByteCount; 

tx_count = m_TxReq; 

m_initialTry = false; 

} 

else 
{ 

m_retryCount++; 

if( m_retryCount > I2C_RETRY_COUNT ) 
{ 

m_initialTry = false; 
if ( m_error_code == 0 ) 

m_error_code = iPortEventCode; 
//ASSERT (m_retryCount <= I2C_RETRY_COUNT) ; 
I2CClose() ; 

r = I2COpen(m_HWnd, Af xGetlnstanceHandle () , &i2c) 
ASSERT ( r == 0 ) ; 

m_state = MI2C_STATE_PENDING_OPEN; 
return,- 

} 

tx_count = 0 ; 

} 

m_State = MI2C_STATE_OPEN; 
m_tx_read += tx_count; 
m_tx_read %= MI2_BUFFER_SIZE; 
if( m_get_detect ) 
{ 

m_get_detect = false; 

r = I2CMasterRxExt (I2C_SLAVE_ADDRESS, 3, 1, 1) ; 

if( r ) 

{ 

if ( m_error_code == 0 ) . 
m_error_code = r; 

} 

else ■ - - 

m_state = M 1 2 C_STATE_PEND ING_PJC ; 

} 

else if ( m_tx_read ! = m_tx_write ) 

SendDSPMemory (NULL, 0L) ; 
break ,- 

/* case MI2C_STATE_PENDING_TX: 

if( iPortEventCode == I2C_MTX_COMPLETE ) 
{ 

r = I2CGetStatus (&si2c) ; 

if( m_TxReq == si2c . MasterTxByteCount ) 

{ 

m_state = MI2C_STATE_OPEN; 
m_tx_read += m_TxReq; 
m_tx_read %= MI2_BUFFER_SIZE; 
if( m_tx_read 1= m_tx_write ) 
SendDSPMemory (NULL, 0L) ; 
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} 

) 

else 
{ 

m_error_code = iPortEventCode; 
,-m_tx_read = m_tx_write = 0; 
m_state = MI2C_STATE_OPEN; 
if( m_tx_read ! = m_tx_write ) 
SendDSPMemory (NULL., 0L) ; 

} 

break; */ 

} 



) 

BOOL I2CIPortComm: :CheckState 0 
{ 

return! m_state == MI2C_STATE_OPEN ); 

} 

long I2CIPortComm: :GetDetectState ( ) 
{ 

long r,rval = 0; 

iff m_error_code ) 
{ 

rval = -m_error_code ; 
m_error_code = 0 ; 

} 

else 
{ 

rval = ( m_detect ) ? 1 : 0; 

} 

/*if( m_state == MI2C_STATE_PENDING_TX ) 

m_get_detect = true; 
else if( m_state == MI2C_STATE_OPEN ) 
{ 

r = I2CKasterRxExt(I2C_SLAVE_ADDRESS,3,l,l) 
if( r ) 

m_error_code = r; 
else 

m_state = MI2C_STATE_PENDING_RX; 

}*/ 

return ( rval ) ; 

} 

BOOL I2CIPortComm: : IsTransmitting ( ) 
{ 

return! m_tx_write != m_tx_read ); 




} 



flif !defined(AFX_I2CDIAj^_B5D510E6_F7D5_llD2_96EE_006097CDB9E2^TNCLUDED ) 

((define AFX_I2CDIALOG_H_B5DS10E6_F7DS_11D2_96EE_006097CDB9E2_INCLUDED_ 

Sif _MSC_VER >= 1000 
tfpragma once 

ffendif // _MSC_VER >= 1000 
// I2CDialog.h : header file 
// 

^ / ^^ /// { //////////////// ////////////////////////////////////////////////// 
// CI2CDialog dialog 

class CI2CDialog : public CDialog 

UINT ra_timerID; 
int m_state; 

// Construction 
public: 

CI2CDialog (CWnd* pParent = NULL) ; // standard constructor 

// Dialog Data 

//{ {AFX_DATA (CI2CDialog) 
enum { IDD = IDD_DIALOG2 } ; 

// NOTE: the ClassWizard will add data members here 
//) }AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

//{ {AFX_VIRTUAL(CI2CDialog) 

public: 

virtual BOOL OnCmdMsg (UINT nID. int nCode, void* pExtra. AFX_CMD HANDLER INFO * pHandlerlnf o) ; 

ULcC Leu I 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//}}AFX_VIRTUAL W 

// Implementation 
protected: 

/ / Generated message map functions 
//{ {AFX_MSG (CI2CDialog) 
virtual BOOL OnlnitDialogO ; 
afx_msg void OnTimer(UINT nIDEvent) ; 
afx_msg void OnCloseO; 
//} }AFX_MSG 
DECLARE_MESSAGE MAP ( ) 

}; 

//{ {AFX_INSERT_LOCATION} } 

// Microsoft' Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_I2CDIALOG_H_BSD510E6_F7D5_11D2_96EE_006097CDB9E2_INCLUDED_) 
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// I2CDialog.cpp : imple^Pfcation file 
// 

ftinclude "stdafx.h" 
ffinclude "sa.h" 
Sinclude "I2CDialog.h" 
ffinclude "DSPS6kManager .h" 

Sdefine TIMERID 55 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[] = FILE ; 

#endif 




'nmMi'y ""J",' ""' ""' " n "' '' ' ,lh '"iiiiiiiiiiiiiiinmim/i/ii,/ 

II t-±*:c_uialog dialog 



CI2CDialog: : CI2CDialog (CWnd* pParent /*=NULL*/) 
^ : CDialog(CI2CDialog: : IDD, pParent) 

//{ {AFX_DATA_INIT(CI2CDialog) 

// NOTE: the ClassWizard will add member initialization here 
//} )AFX_DATA INIT 

} 



void CI2CDialog: : DoDataExchange (CDataExchange* pDX) 

CDialog: :DoDataExchange (pDX) ■ 
// { { AFX_DATA_MAP (CI2CDialog) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
//}}AFX_DATA MAP 
} ~ 

BEGIN_MESSAGE_MAP(CI2CDialog, CDialog) 

// { {AFX_MSG_MAP (CI2CDialog) 

ON_WM_TIMER ( ) 

ON_WM_CLOSE ( ) 

//}}AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

11 i.iji.uiaiog message handlers 

BOOL CI2CDialog : : OnlnitDialog ( ) 

CDialog: :OnInitDialog() ; 

// TODO: Add extra initialization here 
g_DSPManager = new CDSPSSkManager (this->m_hWnd) ; 

ra_timerID = 0; 

m_timerID = SetTimer (TIMERID, 50, NULL) ; 
m_state =0; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 

void CI2CDialog: :OnTimer (UINT nIDEvent) 

//TODO: Add your message handler code here and/or call default 
if( nIDEvent == TIMERID ) 

if( g_DSPManager->IsReady () ) 
switch( m state ) 
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case 0: 

gJDSPManager- >DownloadDSPCode ( ) ; 

m_state++; 

break ; 
case 1: 

g_DSPManager->ResetAll () ; 

EndDialbg(IDOK) ; 

break ; 
default : 

EndDialog (IDOK) ■ 

break; 

) 

} 

else if( g_DSPManager->GetHDCDMode () < 0 ) 
EndDialog ( IDABORT) ; 

} 

else 
{ 

CDialog: : OnTimer (nIDEvent) ; 

} 



} 



BOOL CI2CDialog: : OnCmdMsg (UINT nID, int nCode, void* pExtra, AFX_CMDHANDLERINFO* pHandler Info) 

// TODO: Add your specialized code here and/or call the base class 
^ return CDialog: : OnCmdMsg (nID, nCode, pExtra, pHandlerlnfo) ; 

void CI2CDialog: :OnClose() 
{ 

// TODO: Add your message handler code here and/or call default 
if( m_timerID ) 

KillTimer( m_timerID ) ; 

CDialog : : OnClose ( ) ; 

} 



0064 



UJ . RDIALOG_H_7SC389E8_F889_llD2_96EE_OoW^CDB9E2 INCLUDED ) 

fldefine AFX_I2CCOMMERRORDIALOG_H_76C38 9E8_F889_llD2_96EE_006O97CDB9E2_INCLUDED_ 

8if _MSC_VER >= 1000 
Spragma once 

ffendif // _MSC_VER >= 1000 

// I2CCommErrorDialog.h : header file 

// 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 / 1 1 /// 1 1 / 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 J J 1 1 1 1 1 / 1 1 1 1 / 1 1 1 1 1 1 [ l J I 
// CI2CCommErrorDialog dialog 

class CI2CComm£rrorDialog : public CDialog 

// Construction 
public: 

CI2CCommErrorDialog (CWnd* pParent = NULL); // standard constructor 

// Dialog Data 

/ / { { AFX_DATA ( CI2 CCommErrorDialog ) 
enum { IDD = IDD_DIALOG4 } ; 
CString m_ErrorCode; 
/ / } } AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

//{{AFX_VIRTUAL<CI2CCommErrorDialog) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
// } }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 
//{ {AFX_MSG(CI2CCommErrorDialog) 
afx_msg void OnButtonl ( ) ; 
//} }AFX_MSG 
DECLARE_MESSAGE MAP ( ) 

};- 

// { {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // !defined(AFX_I2CCOMMERRORDIALOG_H_7SC389E8_F889_HD2_9GEE_00S097CDB9E2_INCLUDED_) 
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// I2CComm£rrorDialog . d 




implementation file 



// 



ffinclude "stdafx.h" 
ffinclude "sa.h" 

ffinclude " I2CCommErrorDialog . h" 

ffifdef _DEBUG 
ftdefine new DEBUG_NEW 
ffundef THIS__FILE 

static char THIS_FILE[] = FILE 

ftendif 



1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 J 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 II 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 [ 1 1 1 1 1 / 1 1 1 1 



II CI2CCommErrorDialog dialog 



CI2CCommErrorDialog : : CI2CCommErrorDialog (CWnd* pParent /*=NULL*/) 
: CDialog ( CI2CCommErrorDialog : : IDD, pParent) 

//{ {AFX_DATA_INIT(CI2CCommErrorDialog) ■ 
m_ErrorCode = _T ( "" ) ; 
//} }AFX_DATA_INIT 

} 



void CI2CCommErrorDialog: : DoDataExchange (CDataExchange* pDX) 

CDialog: : DoDataExchange (pDX) ; 
// { { AFX_DATA_MAP (CI2CCommErrorDialog) 
DDX_Text (pDX, IDC_EDIT1, m_ErrorCode) ; 
/ / } } AFX_DATA_MAP 



BEGIN_MESSAGE_MAP(CI2CCommErrorDialog, CDialog) 
// { {AFX_MSG_MAP (CI2CCommErrorDialog) 
ON_BN_CLICKED ( IDC_BUTT0N1 , OnButtonl ) 
//} }AFX_MSG_MAP 

END_MESSAGE_MAP ( ) 



I /1 1 1 1 1 1 1 1 1 1 1 II 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 / 1 1 1 1 1 1 / 1 1 1 1 1 / 1 / 1 



I / CI2CComraErrorDialog message handlers 

void CI2CCommErrorDialog: :OnButtonl() 

// TODO: Add your control notification handler code here 
EndDialog (IDCANCEL) ; 
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ac^^^r the CPEQParam class. 



// PEQParam.h: interfac 
// 

////////////////////////////////////////////////////////////////////// 

#if ! defined (AFX_PEQPARAM_H 733FB7AB_4A49_11D3_96EE_00G097CDB9E2 INCLUDEDJ 

#define AFX_PEQPARAM_H 733FB7AB_4A49_11D3_96EE_006097CDB9E2 INCLUDED^ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 

typedef struct _biquadcoef 
{ 

float c[6] ; //bO,bl,b2,aO,al,a2 
*} biquadcoef; 
class CPEQParam 



float m_Gain; // in dB (+ or -) 

float ra_Q; // in Q units 

float ra_Frequency; // in Hz 

float m_SampleRate; // in Hz 

double m_pi ; 



public: 

void GetCoef (biquadcoef *); 

void GetAllpassCoef (biquadcoef *) ; 

void SetQtfloat v) { ra_Q = v; } 

void SetQtCString &str) ; 

void SetGain( float v) { m_Gain = v ; } 

void SetGain(CString &str) ; 

void SetFreq( float v) { ra_Frequency = v; } 

void SetFreq(CString &str) ; 

CPEQParam ( ) ; 

virtual -CPEQParam () ; 

}; 

#endif // !def ined(AFX_PEQPARAM_H_733FB7AB_4A49_HD3_96EE_006097CDB9E2_INCLUDED_) 
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// PEQParara.cpp: implem^^i on 0 f the CPEQParam class. 

III 'l'/l/l/llllll///l//l/ll/// //////, ////////,,/,/, ,,,,,,,/,,, ///////// 

Sinclude "stdafx.h" 

Sinclude "sa.h" 

ff include "PEQParam.h" 

#include <stdio.h> 

Sinclude <math.h> 

#ifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE[]= FILE ; 

tfdefine new DEBUG_NEW 
#endif 

llllll/llllllllllllllllllllllllllll/II//llllllll,, n ,,i milUI//lflll 
II Construction/Destruction 

Illlll/IIIIIIIIIIIIIIIIIIIIIIIIIIIIIII/lllllllllll/UIIIIIIII/l/inUI 
CPEQParam : : CPEQParam ( ) 

^ : ^Frequency (O.S) ,m_Gain(0.0) ,m_Q(1.0) , m_SampleRate (44100 . ) 
m_pi = acos (-1 . ) ; 



CPEQParam: : -CPEQParam ( ) 



void CPEQParam: :SetGain(CString & str) 
float v; 

sscanf (str, "%f",&v) ; 
m Gain = v; 



void CPEQParam: : SetFreq (CString & str) 



float v; 

sscanf (str, "%f ", &v) ; 
m_Frequency = v; 

} 

void CPEQParam: :SetQ (CString & str) 
float V; 

sscanf (str, "%f" ,&v) ; 
m_Q = v; 

} 



void CPEQParam: :GetAllpassCoef (biquadcoef *f) 
double gamma, beta, wc, tbeta; 

double normFreq = m_Frequency/m_SampleRate ; 

wc = m_pi*normFreq; 
gamma = -cos(wc); 
tbeta = wc/(2*m_Q) ; 
if ( tbeta > m_pi/4 ) 

tbeta = m_pi/4; 
beta = (1. -tan (tbeta) )/ (1 . +tan (tbeta) ) ; 



f->c[0] = (float) beta; 



// bo 



f->c[l] = (float) (ga^^Bi+beta) ) ; // bl 

f->c[2] = l.; „ b2 

f->c[3]- = 1.; /; aQ 

f->C[4] = f-> C [l] ; // al 

f->c[5] = (float) beta; // a 2 



void CPEQParam: :GetCoef (biquadcoef *f) 

double M,L; 
biquadcoef af; 

double gain = (float) pow ( 10 . , ra_Gain/20 . ) ; 

GetAllpassCoef (&af ) ; 
M = (l.-gain)/2. ; 
L = (1 . +gain) /2 . ; 

f->c[0] = (float) (af .c[0] *M+L) ; //b0 
f->c[l] = (float) (af .c[lj *M+af .c[4] *L) ; //bl 
f->c[2] = (float) (af .c[2] *M+af .c(5) *L) ; // b2 
f->c[3] = af .c[3] ; 
f->c[4] = af .c[4] ; 
f->c[5] = af .c[5J ; 



} 



Sif !defined(AFX_NOTCHP^iFH 5C8994C7_E2A4_llD2_96EE_006097CDB9sl^iNCLUDED_) 

tfdefine AFX_N0TCHPAGE2_H SC8 994C7_E2A4_11D2_96EE_006097CDB9E2 INCLUDED 

#if _MSC_VER >= 1000 
tfpragma once 

#endif // _MSC_VER >= 1000 
// NotchPage2.h : header file 
// 

class CTabDialog; 

llllllllllllllllllllllllllll/llll/lllllllllllllllllllllllllllllllllllllllllll 
II CNotchPage2 dialog 

class CNotchPage2 : public CPropertyPage 
{ 

DECLARE_DYNCREATE (CNotchPage2 ) 

// Construction 
public : 

CNotchPage2 ( ) ; 

-CNotchPage2 () ; 

// Dialog Data 

// { { AFX_DATA (CNotchPage2 ) 
enum { IDD = IDD_PP9 } ; 
CButton m_BypassSecondButton; 
CButton m_BypassFirstButton; 
CSliderCtrl m_SliderCut4 ; 
CSliderCtrl m_SliderQ4; 
CSliderCtrl m_SliderFrequency4 ; 
CSliderCtrl ra_SliderCut3 ; 
CSliderCtrl m_SliderQ3; 
CSliderCtrl m_SliderFrequency3 ; 
//) }AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAL (CNotchPage2 ) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG(CNotchPage2) 

afx_msg void OnPaintO; 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 

afx_msg void OnBypassFirst () ; 

afx_msg void OnBypassSecondO ; 

//}}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI (int which); 

); 

// { { AFX_INSERT_L0CATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line, 
tendif // ! defined ( AFX_NOTCHPAGE2_H 5C8 994C7_E2A4_11D2_96EE_006097CDB9E2 INCLUDED_) 



1 



0070 




// NotchPage2.cpp : implementation file 
// 

Sinclude "stdafx.h" 

Sinclude "sa.h" 

# include "NotchPage2 . h" 

ffinclude "TabDialog.h" 

Sinclude "DSP56kManager .h" 

#ifdef _DEBUG 
#define new DEBUG_NEW 
Jfundef THIS_FILE 

static char THIS_FILE [J = FILE ; 

#endif 

///////////////////////////////////////////////////////////////////////////// 
/ / CNotchPage2 property page 

IMPLEMENT_DYNCREATE (CNotchPage2 , CPropertyPage) 

CNotchPage2 : :CNotchPage2 () : CPropertyPage (CNotchPage2 : : IDD) 

// { {AFX_DATA_INIT (CNotchPage2) 
/ / } } AFX_DATA_IN IT 

} 

CNotchPage2 : : -CNotchPage2 ( ) 

{ ■ 

} 

void CNotchPage2 : : DoDataExchange (CDataExchange* pDX) 

CPropertyPage : : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CNotchPage2 ) 

DDX_Control (pDX, IDC_CHECK6, m_BypassSecondButton) ; 
DDX_Control(pDX, IDC_CHECK5, m_BypassFirstButton) ; 
DDX_Control (pDX, IDC_SLIDERG, m_SliderCut4) ; 
DDX_Control(pDX, IDC_SLIDER5, m_SliderQ4) ; 
DDX_Control(pDX, IDC_SLIDER4 , m_SliderFrequency4 ) ; 
DDX_Control (pDX, IDC_SLIDER3, m_SliderCut3) ; 
DDXjControl (pDX, IDC_SLIDER2, m_SliderQ3) ,- 
DDX_Control (pDX, IDC_SLIDER1, m_SliderFrequency3) ; 
// } } AFX_DATA MAP 

} 



BEGIN_MESSAGE_MAP <CNotchPage2 , CPropertyPage) 
//{ {AFX_MSG_MAP (CNotchPage2) 
ON_WM_PAINT ( ) 
ON_WM_VSCROLL ( ) 

ON_BN_CLICKED ( IDC_CHECK5 , OnBypassFirs t) 
0N_BN_CLICKED(IDC_CHECK6, OnBypassSecond) 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

ii iii uii tii i iii ii ii iii i ii / mi m 111 1 111 ii i mi 1 1 mi urn ii ii 111 m 

1/ CNotchPage2 message handlers 

void CNotchPage2 : : OnPaint ( ) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_SliderFrequency3 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchSFreq) ) 
m_SliderQ3 -SetPos (CONTR0L_RANGE-g_DSPManager->GetParamValue (kNotchSQ) ) ; 
m_SliderCut3 . SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotchSCut ) ) ; 
m_SliderFrequency4 .SetPos ( CONTROL_RANGE - g_DS PManager - >Ge t Par amValue (kNotch7Freq) ) 
m_SliderQ4 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch7Q) ) • 
m_SliderCut4. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue(kNotch7Cut) ) ; 

m_BypassFirstButton.SetCheck(g_DSPManager->GetBypassSection(kBypassNotch3) ) ; 
m_BypassSecondButton . SetCheck (g_DS PManager- >GetBypassSect ion (kBypassNotch4 ) ) ; 
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^ // Do not call CPropertyPage: :OnPaint () for painting messages. 

BOOL CNotchPage2: : OnlnitDialog ( ) 

CPropertyPage : : OnlnitDialog ( ) ; 

// TODO: Add extra initialization here 
m_SliderFrequency3 . SetRange (0, CONTROL_RANGE) ; 

m_SliderFrequency3 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch6Freq) ) 
m_SliderFreguency3 .SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_Slider Frequency 3 . SetPageSize ( PG_CONTROL_AMT) ; 

m_SliderQ3 . SetRange (0 , CONTROL_RANGE ) ; 

m_SliderQ3 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (JcNotch6Q) ) ; 
m_SliderQ3 .SetTicFreq( ( CONTROL_RANGE+ 1 ) /16) ; 
m_SliderQ3 . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderCut3 .SetRange (0, CONTROL_RANGE) ; 

m_SliderCut3 .SetPos (CONTROL J£ANGE-g_DSPManager->GetParamValue (kNotchSCut) ) ; 
m_SliderCut3 .SetTicFreq( (C0NTR0L_RANGE+1) /IS) ; 
m_SliderCut3 . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderFrequency4 .SetRange ( 0 , CONTROIi_RANGE ) ; 

m_SliderFrequency4 . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue 0cNotch7Freq) ) 
m_SliderFrequency4 .SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_Slider Frequency^ .SetPageSize (PG_CONTROL_AMT) ; 

m_SliderQ4 . SetRange ( 0 , CONTROL_RANGE ) ; 

m_SliderQ4 .SetPos ( CONTROL_RANGE - g_DS PManager - >Ge t ParamVa lue (JcNotch7Q) ) ,- 
m_SliderQ4 . SetTicFreq ( (CONTROL_RAHGE+l) /16) ; 
m_SliderQ4 . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderCut4 .SetRange ( 0 , COtJTROL_RANGE) ; 

m_SliderCut4 . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch7Cut) ) ; 
ra_SliderCut4 . SetTicFreq ( (CONTROL_RANGE+l) /16) ; 
m_SliderCut4 . SetPageSize ( PG_C0NTR0L_AMT) ; 

m_ParentWindow = (CTabDialog *) GetParent ( ) ->GetParent ( ) ; 

return TRUE; // return TRUE unless you set the focus to a control 
^ // EXCEPTION: OCX Property Pages should return FALSE 

void CNotchPage2: : OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl MpScrollBar; 
int which; 

CPropertyPage: : OnVScroll (nSBCode, nPos, pScrollBar) ; 
Sleep (50) ; 

if( slider == &m_SliderFrequency3 ) 

. which = kNotch6Ereq; 
else if( slider == &m_SliderQ3 ) 

which = kNotch6Q; 
else if( slider == &m_SliderCut3 ) 

which = kNotch6Cut; 
else if{ slider == &m_SliderFrequency4 ) 

which = kNotch7Freq ; 
else if( slider == &m_SliderQ4 ) 

which = kNotch7Q ; 
else if{ slider == &m_SliderCut4 ) 

which = kNotch7Cut; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL_RANGE- slider- >GetPos ( ) , which) • 
SendStringToUI (which) ; 



) 



void CNotchPage2: : SendStringToUI (int which) 



CString str ; 



g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString (0, str) ; 

} 



void CNotchPage2: :OnBypassFirst ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButton. GetState ( ) & 0x3;. 

g_DSPManager->SetBypassSection(state, kBypassNotch3) ; 

} 

void CNotchPage2 : :OnBypassSecond() 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecondButton. GetState ( ) & 0x3; 

g_DSPManager- >SetBypassSection ( s tate , kBypassNotch4 ) ; 



} 



PA^^^H 0CF7E208_D790 11D2 96EE 006097CDB9^^^ II 



#if ! defined (AFX_NOTCHPA(^^_H OCF7E2 08_D790_11D2_96EE_006097CDB9E^_INCLUDED_) 

((define AFX_N0TCHPAGE1_H 0CF7E2 08_D7 90_11D2_96EE_006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

Sendif // _MSC_VER >= 1O0O 
// NotchPagel.h : header file 
II 

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 /1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 
II CNotchPagel dialog 

class CTabDialog; 

class CNotchPagel : public CPropertyPage 
( 

DECIARE_DYNCREATE ( CNo t chPag e 1 ) 

// Construction 
public: 

CNotchPagel () ; 

-CNotchPagel ( ) ; 



// Dialog Data 

//{ {AFX_DATA(CNotchPagel) 
enum { IDD = IDD_PP4 } ; 
CButton m_Eypas'sSecondButton; 
CButton m_BypassFirstButton; 
CSliderCtrl m_SliderCut2 ; 
CSliderCtrl ra_SliderQ2 ; 
CSliderCtrl m_SliderFrequency2 ; 
CSliderCtrl m_SliderCutl; 
CSliderCtrl m_SliderQl; 
CSliderCtrl m_SliderFrequencyl ; 
//} )AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

//{ {AFX_VIRTUAL (CNotchPagel) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

// Generated message map functions 

//{ {AFX_MSG (CNotchPagel) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 
afx_msg void OnShowWindow(BOOL bshow, UINT nStatus) ; 
af x_msg void OnPaint ( ) ; 
afx_msg void OnBypassFirst ( ) ,- 
afx_msg void OnBypa_ssSecond ( ) ; 

//}}AFX_MSG .. . . ' . . 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow; 
void SendStringToUI (int which); 

}; 

//{ {afx_insert_location} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif / / (defined (AFX_N0TCHPAGE1_H OCF7E208_D790_11D2_96EE_006097CDB9E2 INCLUDED_) 
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// NotchPagel .cpp : imp^mentation file 
// 

# include "stdafx.h" 

# include "sa.h" 

ff include "NotchPagel .h" 

ff include "TabDialog . h" 

((include "DSP56kManager . h" 

Sifdef _DEBUG 
((define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE [] = FILE ; 

#endif 




lllllllllllllllll/IIIIIIIIIIIUIIIIIIII/IIIIIIIIIIIIIIIIIIIIIIIIIUIIIIIJIIII 
I / CNotchPagel property page 

IMPLEMENT_DYNCREATE(CNotchPagel, CPropertyPage) 

CNotchPagel : : CNotchPagel ( ) : CPropertyPage (CNotchPagel : : IDD) 
{ 

//{ {AFX_DATA_INIT (CNotchPagel) 
//} }AFX_DATA_INIT 

} 

CNotchPagel : : -CNotchPagel ( ) 



void CNotchPagel: : DoDataExchange (CDataExchange* pDX) 



CPropertyPage: : DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CNotchPagel) 
DDX_Control (pDX, IDC_CHECK6, 
IDC_CHECK5 , 
IDC_SLIDERS, 
IDC_SLIDER5 , 
IDC_SIiIDER4 , 
IDC_SLIDER3 , 
IDC_SLIDER2 , 
IDC SLIDER1, 



DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
// } } AFX_DATA_MAP 



m_BypassSecondButton) , 
m_BypassFirstButton) ; 
m_SliderCut2) ; 
m_SliderQ2) ; 
m_SliderFrequency2) ; 
m_SliderCutl) ; 
m_SliderQl) ; 
m_SliderFrequencyl) ; 



BEGIN_MESSAGE_MAP (CNotchPagel, CPropertyPage) 
//{ {AFX_MSG_MAP (CNotchPagel) 
ON_WM_VSCROLL ( ) 
ON_WM_SHOWWINDOW ( ) 
ON_WM_PAINT () 

ON_BN_CLICKED ( IDC_CHECKS , OnBypas sFir B t ) 
ON_BN_CLICKED ( IDC_CHECK6, OnBypassSecond) 
//} }AFX_MSG_MAP 
END_MESSAGE^MAP ( ) 

///////////////////////////////////////////////////////////////////////////// 
II CNotchPagel message handlers 

BOOIi CNotchPagel : : OnlnitDialog ( ) 
{ 

CPropertyPage: : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_SliderFrequencyl . SetRange ( 0 , CONTROL_RANGE ) ; 

ra_SliderFrequencyl.SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchlFreq) ) 
m_SliderFrequencyl.SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_SliderFrequencyl.SetPageSize(PG_CONTROL_AMT) ; 

m_SliderQl . SetRange ( 0 , CONTROL_RANGE) ; 

m_SliderQl .SetPos (CONTROL_RANGE-g_DSPManager->GetPararaValue (kNotchlQ) ) ; 
m_SliderQl .SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
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} 



m_SliderQl . Set Pages i ze ( PG__C0NTROL_AMT) ; 
m_SliderCutl .SetRange (0, CONTROL_RANGE) ; 

m_SliderCutl.SeCPos(CONTROL_RANGE-g_DSPManager->GeCParamValue(kNotchlCut) ) • 
m_SliderCutl .SetTicFreq( (CONTROL_RANGE+1) /16) ; 
m_SliderCutl . SetPageSize (PG_CONTROL_AMT) ; 

m_SliderFrequency2. SetRange ( 0 , CONTROL_RANGE ) ; 

m_SliderFrequency2. SetPos (CONTROL JJANGE-g_DSPManager->GetParamValue (kNotch2Freq) ) 
m_SliderFrequency2 .SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_SliderFrequency2 . SetPageSize (PG_CONTROL AMT) ; 

m_SliderQ2 . SetRange ( 0 , CONTROL_RANGE) ; 

m_SliderQ2 .SetPos ( C0NTR0L_RANGE -g_DS PManage r - >Ge t Par amValue <kNotch2Q) ) • 
m_SliderQ2 .SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_SliderQ2 .SetPageSize (PG_CONTROL_AMT) ; 

m_SliderCut2 . SetRange ( 0 , CONTROL_RANGE ) ; 

m_SliderCut2. SetPos (CONTR0L_RANGE-g_DSPManager->GetParamValue (kNotch2Cut) ) • 
m_SliderCut2 .SetTicFreq( (CONTROL_RANGE+l) /16) ; 
m_SliderCut2 .SetPageSize (PG_C0NTR0L_AMT) ; 

m_ParentWindow = (CTabDialog *) GetParent () ->GetParent ( ) ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 



void CNotchPagel: : OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar ; 
int which; 

CPropertyPage: : OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep (50) ; 

if ( slider == &m_SliderFrequencyl ) 

which = kNotchlFreq; 
else if( slider == &m_SliderQl ) 

which = kNotchlQ; 
else if ( slider == &m_SliderCutl ) 

which = kNotchlCut; 
else if( slider == &m_SliderFrequency2 ) 

which = kNotch2Freq; 
else if( slider. == &m_SliderQ2 ) 

which = kNotch2Q; 
else if( slider == &ra_SliderCut2 ) 

which = kNotch2Cut; 
else 

return; 

g_DSPManager->SetPararaValue ( CONTROL_RANGE -si ider - >Ge t Pos ( ) which) • 
SendStringToUI (which) ; 

} 

void CNotchPagel: : OnShowWindow (BOOL bShow, UINT nStatus) 
CPropertyPage: : OnShowWindow (bShow, nStatus) ; 
// TODO: Add your message handler code here 



void CNotchPagel: :OnPaint() 

• CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

"-f n U ^ erFreqUenCyl ' SetP ° S (C0NTR0L -RANGE-g_DSP Ma Tiager->GetParamValu e (kNotchlFreq) ) 
m_Slider Q l . SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue (kNotchlQ) ) ■ 
m_SliderCutl . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotchlCut )) • 
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m_SliderFrequency2 . SetP^^CONTROL_RANGE-g_DSPManager- >GetParamVa!rae (kNotch2Freq) ) 
ra_SliderQ2 .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kNotch2Q) ) ; 
m_SliderCut2 .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kNotch2Cut) ) ; 
m_BypassFirstButton.SetCheck(g_DSPManager->GetBypassSection(kBypassNotchl) ) ; 
m_BypassSecondButton.SetCheck (g_DSPManager- >GetBypassSection (kBypassNotch2 ) ) ; 

// Do not call CPropertyPage : : OnPaint ( ) for painting messages 

} 

void CNotchPagel :: SendStringToUI (int which) 



CString str; 



g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow- >SetStatusString ( 0 , str) ; 



void CNotchPagel : :OnBypassFir st ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = tn_BypassFirstButton. GetState ( ) & 0x3; 



g_DSPManager->SetBypassSect ion (state, kBypassNotchl) ; 



void CNotchPagel: : OnBypassSecond ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassSecondButton. GetState () & 0x3; 



g_DSPManager- >SetBypassSect ion (state , kBypassNotch2 ) ; 



} 



TOFTPAGE H E272822S E026 11D2 96EE 006097<-nRQP? 



ffif ! defined (AFX_NEWCUTOfWaGE_H E272822S_E026_11D2_96EE_006097CDB9E2 INCLUDED_) 

((define AFX_NEWCUTOFFPAGE_H E2 72 B22 6_E02 6_11D2_96EE_006097CDB9E2 INCLUDED_ 

Sif _MSC_VER >= 1000 
Spragma once 

#endif // _MSC_VER >= 1000 

// NewCutoffPage.h : header file 

// 

class CTabDialog; 

llllllllllllllllllllllllllllllllllllllllllllllltlllll/lll/lllfllltlllllllllll 
II CNewCutof f Page dialog 

class. CNewCutof f Page : public CPropertyPage 
DECLARE_DYNCREATE (CNewCutof f Page) 

// Construction 
public: 

CNewCutof f Page ( ) ; 

-CNewCutof f Page () ; 

/-/ Dialog Data 

//{ {AFX_DATA( CNewCutof fPage) 
enum { IDD = IDD_PP8 } ; 
CButton m_BypassNLopassButton; 
CSliderCtrl mJJewHiQSlider ; 
CSliderCtrl m_NewHiFreqSlider ; 
CButton m_BypassLopassButton; 
CButton m_BypassHipassButton; 
CSliderCtrl m_HiQSlider ; 
CSliderCtrl m_HiFreqSlider ; 
CSliderCtrl m_LoQSlider ; 
CSliderCtrl m_LoFreqSlider ;■ 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

//{ {AFX_VIRTUAL (CNewCutof f Page) 

public: 

virtual BOOL OnSetActive ( ) ; 
protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//}}AFX_VIRTUAL 

// Implementation 
protected : 

// Generated message map functions 

//{ {AFX_MSG {CNewCutof f Page) 

afx_msg void OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) ; 
virtual BOOL OnlnitDialog ( ) ; 

afx__msg void OnShowWindow ( BOOL bShow, UINT nStatus) ; 

afx_msg_void -OnPaint ( ) ; . - 

afx_msg void OnBypassHipass ( ) ; 
afx_msg void OnBypassLopass ( ) ,- 
afx_msg void OnBypassNewLopass ( ) ; 
//}}AFX_MSG 
DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow ; 
void SendStringToUI ( int which); 

); 

//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // !defined(AFX_NEWCUTOFFPAGE_H'_E272822S_E026_llD2_96EE_00S097CDB9E2_INCLUDED ) r\ f\ m rs 
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// NewCutoffPage.cpp : implementation file 
// 

Sinclude "stdafx.h" 
Sinclude "sa.h" 
{(include "NewCutoff Page .h" 
#include "TabDialog.h" 
Sinclude "DSP5SkManager .h" 

#ifdef _DEBUG 
ftdefine new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE [J = FILE ; 

Sendif 



IIIIIIIIIIIIIIIIIIIIIUIIIIIIIIII/IIIIIIIIIIIIIIIIIIIII/IIIIIII/IIIIIIIIIIIII 
II CNewCutof f Page property page 

IMPLEMENTJDYNCREATE (CNewCutof f Page , CPropertyPage) 

CNewCutof f Page : : CNewCutof f Page ( ) : CPropertyPage (CNewCutof f Page : : IDD) 

/ / { { AFX_DATA_IN IT ( CNewCu t o f f Page ) 
//} }AFX_DATA_INIT 



CNewCutof f Page: : -CNewCutof f Page ( ) 

{ 

} 

void CNewCutof f Page : : DoDataExchange (CDataExchange* pDX) 

CPropertyPage : : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CNewCutof f Page) 



DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX , 
DDX_Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
// } } AFX_DATA_MAP 



IDC_CHECK7, m_BypassNLopassButton) ; 
IDC_SLIDER9, ra_NewHiQSlider) ; 
IDC_SLIDER8, m_NewHiFreqSlider) ; 
IDC_CHECK5, m_BypassLopassButton) ; 
IDC_CHECK4, m_BypassHipassButton) ; 
IDC_SLIDER5, m_HiQSlider) ; 
IDC_SLIDER4, m_HiFreqSlider) ; . 
IDC_SLIDER2, m_LoQSlider) ,- 
IDC_SLIDER1, m_LoFreqSlider) ; 



BEGIN_MESSAGE_MAP (CNewCutof f Page, CPropertyPage) 
// ( {AFX_MSG_MAP (CNewCutof f Page) 
ON_WM_VSCROLL ( ) 
ON_WM_SHOWWINDOW ( ) 
ON_WM_PAINT ( ) 

ON_BN_CLICKED ( IDC_CHECK4 , OnBypassHipass) 
0N_BN_CLICKED(IDC_CHECK5, C5nBypassLopass) 
- 0N_BN_CLICKED (IDC;_CHECK7,- OnBypassNewLopass) 

//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

lll/IIIIIIIIIIIIIJIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII/lllllllllllllll 
II CNewCutof f Page message handlers 

yoid CNewCutof f Page: :OnVScroll(UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar; 
int which; 

CPropertyPage: : OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep (50) ; 

iff slider == &m_LoFreqSlider ) 
which = kLoCutof f Freq; 
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else if( slider == &m 

which = kLoCutoffQ; 
else if( slider == &m_HiFreqSlider ) 

which = kHiCutoff Freq; 
else if( slider == &m_HiQSlider ) 

which = kHiCutoffQ; 
else if( slider == &m_NewHiFreqSlider ) 

which = kHiCutof f2Freq; 
else if( slider == &m_NewHiQSlider ) 

which = kHiCutof f 2Q; 
else 

return; 

g_DSPManager->SetPararaValue (C0NTROL_RANGE-slider->GetPos () .which) 
SendStringToUI (which) ■ 



void CNewCutoff Page :: SendStringToUI (int which) 
{ 

CString str; 

g_DSPManager->GetStringValue (which, str) ,- 
m_ParentWindow->SetStatusString(0, str) ,- 

} 

BOOL CNewCutoff Page : : OnlnitDialog ( ) 
{ 

CPropertyPage: : OnlnitDialog () ; 

// TODO: Add extra initialization here 
m_LoFreqSlider . SetRange ( 0 , CONTROL__RANGE ) ; 

m_LoFreqSlider. SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kLoCutof f Freq) ) ; 
m_LoFreqSlider.SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_LoFreqSlider . SetPageSize (PG_CONTROL_AMT) ; 

m_LoQSl ider . SetRange ( 0 , CONTROL_RANGE ) ; 

m_LoQSlider .SetPos (CONTROL_RANGE-g_DSPManager- >GetParamValue (kLoCutoffQ) ) ; 
m_LoQSlider .SetTicFreq( (CONTROL_RANGE+l) /IS) ; 
m_LoQSlider .SetPageSize (PG_CONTROL_AMT) ; 

m_HiFreqSlider . SetRange ( 0 , CONTROL_RANGE) ; 

ra_HiFreqSlider . SetPos (C0NTROL__RANGE-g_DSPManager->GetParamValue (kHiCutof f Freq) ) ; 
m_HiFreqSlider.SetTicFreq( (C0NTR0LJRANGE+1) /16) ; 
m_HiFreqSlider. SetPageSize (PG i _C0NTR0L_AMT) ; 

m_HiQSlider . SetRange ( 0 , C0NTR0L_RANGE) ; 

m_HiQSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kHiCutoffQ) ) ; 
ra_HiQSlider .SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_HiQSlider . SetPageSize (PG_CONTROL_AMT) ; 

m_NewHiFreqSlider.SetRange(0,CONTROL_RANGE) ; 

m_NewHiFreqSiider . SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kHiCutof f 2Freq) ) 
m_NewHiEreqSlider . SetTicFreq(-(CONTROL_RANGE+l) /16) ; - ...... 

m_NewHiFreqSlider . SetPageSize (PG_CONTROL_AMT) ; 

m_NewHiQSlider.SetRange(0,CONTROL_RANGE) ; 

m_NewHiQSlider. SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kHiCutof f2Q) ) ; 
m_NewHiQSlider.SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 
m_NewHiQSlider . SetPageSize ( PG_CONTROL_AMT) ; 

m_ParentWindow = (CTabDialog *) GetParent () ->GetParent ( ) ; 

return TRUE; // return TRUE unless you set the focus to a control 
^ // EXCEPTION: OCX Property Pages should return FALSE 



yoid CNewCutoff Page: : OnShowWindow (BOOL bShow, UINT nStatus) 
CPropertyPage: : OnShowWindow (bShow, nStatus) ; 
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// TODO: Add your message handler code here 

} 

BOOL CNewCutof f Page : :OnSetActive () 
{ 

// TODO: Add your specialized code here and/or call the base class 
return CPropertyPage : : OnSetActive ( ) ; 

} 

void CNewCutof f Page : :OnPaint ( ) 
{ 

CPaintDC dc(this); // device context for painting 
// TODO: Add your message handler code here 

m_LoFreqSlider . SetPos (C0NTROL_RANGE-g_DSPManager- >GetParamValue (kLoCutof f Freq) ) ; 
m_LoQSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetPararaValue (kLoCutof fQ) ) ; 
m_HiFreqSlider. SetPos (C0NTROL_ i RANGE-g_DSPManager->GetParamValue (kHiCutof f Freq) ) ; 
m_HiQSlider .SetPos (CONTROL_RANGE-g_DSPManager->GetParamValue (kHiCutof fQ) ) ; 
m_NewHiFreqSlider .SetPos ( CONTROL_RANGE - g_DS PManag er- >Ge t Par amValue (kHiCutof f2Freq) ) 
m_NewHiQSlider .SetPos (C0NTROL_RANGE-g_DSPManager->GetParamValue.(kHiCutof f 2Q) ) ; 

ra_BypassHipassButton. SetCheck (g_DSPManager->GetBypassSection (kBypassHipass) ) ,- 
m_BypassLopassButton. SetCheck (g_DSPManager- >GetBypassSect ion (kBypassLopass) ) ; 
m_BypassNLopassButton. SetCheck (g_DSPManager- >GetBypassSection (kBypassNLopass ) ) ; 
// Do not call CPropertyPage :: OnPaint ( ) for painting messages 

} 

void CNewCutof f Page •. :OnBypassHipass () 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassHipassButton.GetState () & 0x3; 

g_DSPManager- >SetBypassSect ion (state, kBypassHipass) ; 

} 

void CNewCutof f Page : : OnBypassLopass ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassLopassButton.GetState () & 0x3; 

g_DSPManager->SetBypassSect ion (state, kBypassLopass) ; 

} 

void CNewCutof f Page : : OnBypassNewLopass ( ) 
{ 

// TODO: Add your control notification handler code here 
int state = m_BypassNLopassButton.GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection (state, kBypassNLopass) ,- 




} 



// ShelfEQParam.h: interface for the CShelf EQParam class. 
// 





////////////////////////////////////////////////////////////////////// 

ffif ! defined (AFX_Shelf EQPARAM_H 7 3 3FB7AB_4A4 9_11D3_96EE_006097CDB9E2 INCLUDED_) 

Sdefine AFX_Shelf EQPARAM_H 733FB7AB_4A4 9_11D3_96EE_006097CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

(fendif // _MSC_VER >= 1000 

typedef struct _biquadcoef 
{ 

float c[6] ; ■ // b0,bl,b2, a0,al, a2 

) biquadcoef ; 

class CShelf EQParam 
{ 

float m_G'ain; // in dB (+ or -) 

float m_Frequency,- // in Hz 

float m_SampleRate ; // in Hz 

double m_pi ; 

bool m_HiShelf; 

public: 

void GetCoef (biquadcoef *) ; 
void GetAllpassCoef (biquadcoef *) ; 
void SetGain( float v) { m_Gain = v ; } 
void SetGain(CString &str) ; 

void SetFreq( float v) { m_Frequency = v; } 
void SetFreq(CString &str) ; 

CShelf EQParam (bool hi) ; 
virtual -CShelfEQPararaO ; 



#endif // !def ined (AFX_Shelf EQPARAM_H 733FB7AB_4A49_11D3_96EE_006097CDB9E2 INCLUDE D_) 
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♦ • 

mpTEmentation of Che CShelf Enpsram = o = 



// ShelfEQParam.cpp: i mp "!|^e neat ion of Che CShelf EQParam class. 
//////////////////////////// ////////////////////////////////////////// 

If include "stdafx.h" 
# include "sa.h" 
ffinclude "Shelf EQParam . h" 
ffinclude <stdio.h> 
ffinclude <math.h> 

#ifdef _DEBUG 
#undef THIS_FILE 

static char THIS_FILE[]= FILE ; 

#define new DEBUG_NEW 
ffendif 

^rS 

iiiiiiiiiiifiiiii/iiii/iiiiniii//iiiuiiiiuiiiiiiiiiiniii/iuiiiiii 

CShelf EQParam: : CShelf EQParam (bool hi) 

: "--Frequency(0.5),m_Gain(0.0),m_SampleRate(44100.).m_HiShelf(hi) ' 
mjpi = acos (-1 . ) ; 

} 

CShelf EQParam: : -CShelf EQParam ( ) 



void CShelf EQParam: : SetGain (CString & str) 
float v; 

sscanf (str, "%f" , &v) • 
m_Gain = v; 



yoid CShelf EQParam: :SetFreq (CString & str) 
float V; 

sscanf (str, "%f " , &v) ; 
m_Frequency = v; 



void CShelf EQParam: :GetAllpassCoef (biquadcoef *f) 
double gamma, wc; 

double normFreq = m_Frequency/m_SampleRate/2 ; 
wc = mjpi'*n6rmFreq; 

gamma = (tan(wc/2) -1) / (tan(wc/2) +1) ; 

iff m_HiShelf ) 
{ 

f->c[0] = (float) gamma; // bo 

} *-»<=ll] = 1.0; // bl 

else 
{ 

f->c[0] = (float) -gamma; // bo 

} f ->=tD = -1.0, // bl 



f->c[2] = 0; 

f->c[3] = 1. ; 

f->c[4] = (float) gamma; 



// b2 
// ao 
// al 



f->c[5] = 0; 



// 32 



void CShelfEQParam: :GetCoef (biquadcoef *f) 
{ 

double M,L; 
biquadcoef af; 

double gain = (float) pow (10 . , m_Gain/20 . ) ; 

GetAllpassCoef (&af ) ; 
M = (1. -gain) /2 . ; 
L = (l.+gain) /2. ; 

f->c[0) = (float) (af .c[0]*M+L) ; //b0 
f->c(l) = (float) (af .c [1] *M+af .c [4] *L) ; // bl 
f->c[2] = (float) (af.c[2]*M+af.c[5]*L); //b2 
f->cT3] = af .c[3] ; 
f->c[4] = af .c[4] ; 
f->c [5] '= af .c [5] ; 



o 

a- 

m 

u - 

m 

m 



□ 
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!- 
O 
O. 
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// saDlg.h 
II 



header file 





#if !defined(AFX_SADLG_H 33D93BOB_DOB8_11D2_96EE_00 609 7CDB9E2 INCLUDED_) 

#def ine AFX_SADLG_H 3 3D93BOB_DOB8_11D2_96EE_0060 97CDB9E2 INCLUDED_ 

#if _MSC_VER >= 1000 
#pragma once 

#endif // _MSC_VER >= 1000 



Illlltllllllllllflllllllllirilllllllll/lllllllllllllllllllll/llllllllll/IIUI 
II CSaDlg dialog 



// Construction 
public: 

CSaDlg (CWnd* pParent = NULL); // standard constructor 

// Dialog Data 

/ / { { AFX_DATA (CSaDlg ) 

enura { IDD = I DD_S A_D I ALOG } ; 

// NOTE: the ClassWizard will add data members here 
//} }AFX_DATA 

// ClassWizard generated virtual function overrides 

// { { AFX_V I RTUAL (CSaDlg) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ,- // DDX/DDV support 
//}}AFX_VT RTUAL 

// Implementation 
protected: 

HICON m_hIcon; 

// Generated message map functions . 

//{{AFX_MSG (CSaDlg) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnSysCommand(UINT nID, LP ARAM lParam) ; 
af x_msg void OnPaint ( ) ; 
af x_msg HCURSOR OnOueryDraglcon ( ) ; 
afx_msg void OnButtonl ( ) ; 
afx_msg void 0nButton2(); 
//} }AFX_MSG 
DECLARE_MESSAGE_MAP ( ) 



//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
Sendif // Idef ined(AFX_SADLG_H_33D93B0B_D0B8_llD2_96EE_006097CDB9E2 INCLUDED_) 



class CSaDlg : public CDialog 



} 
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// saDlg.cpp 
II 



implementation file 



((include "stdafx.h" 
# include "sa.h" 
ff include "saDlg.h" 

Sinclude "unit_ppi .h" 
((include "functs.h" 
#include "TabDialog . h" 

ffifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[] = FILE 

Sendif 



static int cmd_delay = 1000; 
static int io_delay = 50; 



I / CAboutDlg dialog used for App About 

class CAboutDlg : public CDialoq 
{ 

public : 

CAboutDlg ( ) ; 

// Dialog Data 

//{ {AFX_DATA (CAboutDlg) 
enum { IDD = IDD_ABOUTBOX } ; 
//}}AFX_DATA 

// ClassWizard generated virtual function overrides 

//{ {AFX_VIRTUAL (CAboutDlg) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL ff 

II Implementation 
protected : 

//{ {AFX_MSG (CAboutDlg) 

//}}AFX_MSG 

DECLARE_MESSAGE MAP ( ) 



CAboutDlg : : CAboutDlg ( ) : CDialog (CAboutDlg : : IDD) 

// { {AFX_DATA_INIT (CAboutDlg) 
// } } AFX_DATA_INIT 



void CAboutDlg : . : DoDataExchange (CDataExchange*- pDX-)- - - - 

CDialog: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CAboutDlg) 
// } }AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CAboutDlg, CDialog) 

// { {AFX_MSG_MAP (CAboutDlg) 
//No message handlers 

//}}AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

'// 'JJ ''' ' 'JJ {' ' ' 1 1 1 1 1 1 1 ' 1 1 1 1 1 ' 1 1 1 1 ' 1 1 1 ' I ' 1 1 1 1 / II 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 , , , 1 , 1 1 , 1 1 
/ / Coa.Di.g dialog 



CSaDlg: : CSaDlg (CWnd* pParent /*=NULL*/) 
: CDialog (CSaDlg :: IDD, pParent) . 
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{ 

//{ {AFX_DATA_INIT (CSaDlg) 

// NOTE : the Classwizard win add member initialization here 
//} }AFX_DATA_INIT 

// Note that Loadlcon does not require a subsequent Destroylcon in Win32 
m_hIcon = AfxGetAppO - >LoadIcon C IDR_MAINFRAME) ; 

void CSaDlg: : DoDataExchange (CDataExchange* pDX) 

CDialog: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CSaDlg) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
// } } AFX_DATA__MAP 

) 

BEGIN_MESSAGE_MAP (CSaDlg, CDialog) 
//{ {AFX_MSG_MAP (CSaDlg) 
ON_WM_SYSC0MMAND ( ) 
ON_WM_PAINT ( ) 
ON_WM_QUERYDRAGICON ( ) 

ON_BN_CLICKED (IDC_BUTTONl, OnButtonl) 
ON_BN_CLICKED(IDC_BUTTON2, OnButton2) . 
//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

'// 'JJ ''' ' 1 1 1 1 ' 1 1 ' 1 1 * 1 1 > 1 1 1 1 ' I * 1 1 1 1 1 1 1 1 ' 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 / 1 1 / 1 1 1 1 1 1 1 1 1 / 1 1 1 
1 1 CSaDlg message handlers 

BOOL CSaDlg: : OnlnitDialog ( ) 

CDialog: :OnInitDialog ( ) ; 

// Add "About..." menu item to system menu. 

// IDM_ABOUTBOX must be in the system command range. 
ASSERT (( IDM_ABOUTBOX & OxFFFO) == IDM_ABOUTBOX) ; 
ASSERT (IDM_ABOUTBOX < OxFOOO) ; 

CMenu* pSysMenu = GetSystemMenu (FALSE) ; 

if (pSysMenu != NULL) 

{ 

CString strAboutMenu; 

strAboutMenu.LoadString(IDS_ABOUTBOX) ; 
if (! strAboutMenu. IsEmpty () ) 

pSysMenu- >AppendMenu (MF_SEPARATOR) ; 
^ pSysMenu- >AppendMenu (MF_STRING, IDM_ABOUTBOX , StrAboutMenu); 

} 

// Set the icon for this dialog. The framework does this automatically 
// when the application's main window is not a- dialog 
SetIcon(m_hIcon, TRUE) ; // set big icon 

SetI .q on (m_hIcon, FALSE); . . // Set small icon . . . . 

// TODO: Add extra initialization here 

iff load dll()==falBe ) 

{ 

r'urnlaTse™-" 1 ^ ^ " ^ SySt6m direCt °^- Fix this and restart application.",; 

} 

init_port_spi (1) ; 

set_cmd_delay_cnt_value (cmd_delay) ; 
set_io_delay_cnt_value (io_delay) ; 

return TRUE; // return TRUE unless you set the focus to a control 

void CSaDlg: : OnSysCommand (UINT nID, LPARAM lParam) 008 
if ( (nID & OxFFFO ) == IDM_ABOUTBOX) 
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{ 

CAJboutDlg dlgAbout; 
dlgAbout . DoModal ( ) ; 

} 

else 
{ 

CDialog: : OnSysCommand (nID, lParam) ; 

} 

} 

// If you add a minimize button to your dialog, you will need the code below 
// to draw the icon. For MFC applications using the document/view model, 
// this is automatically done for you by the framework. 

void CSaDlg: :OnPaint() 
{ 

if (Islconic () ) 
{ 

CPaintDC dc(this); // device context for painting 
SendMessage (WM_ICONERASEBKGND, (WPARAM) dc . GetSaf eHdc ( ) , 0) ; 

// Center icon in client rectangle 

int cxlcon = GetSystemMetrics (SM_CXICON) ; 

int cylcon = GetSystemMetrics (SM_CYICON) ; 

CRect rect; 

GetClientRect (&rect) ; 

int x = (rect.WidthO - cxlcon +1) / 2 ; 
int y = ( rect. Height () - cylcon + 1) / 2; 

II Draw the icon 

dc. Drawl con (x, y, m hlcon) ; 

} 

else 
{ 

CDialog : : OnPaint ( ) ; 



// The system calls this to obtain the cursor to display while the user drags 
// the minimized window. 
HCURSOR CSaDlg: : OnQueryDraglcon ( ) 

return (HCURSOR) m hlcon; 

} 

void CSaDlg: :OnButtonl () 
{ 

long tlong; 

tlong=spi_xchng24 (0xAA5SAA) ; 
tlong=spi_xchng24 (0x0) ; 

} - - ■ ■ 



void CSaDlg.- :OnButton2 () 
{ 

// long tlong; 
// 

/ / tlong=spi_xchng24 (0x654321) ; 
/ / tlong=spi_xchng24 (0x0) ; 

CTabDialog dig; 

dig. DoModal () ; 

) 



3 



• # 

// sa.h : mam header file for Che SA application 



#if I defined (AFX_SA_H 33D93B09_DOB8_11D2_96EE_006097CDB9E2 INCLUDED ) 

tfdefine AFX_SA_H_33D93B09_DOB8_11D2_96EE_006097CDB9E2 INCLUDED 

#if _MSC_VEH >= 1000 
Spragma once 

Sendif // _MSC_VER >= 1000 

#ifndef AFXWIN_H [ 

#error include 'stdafx.h' before including this file for PCH 
#endif 

Sinclude " resource. h" // main symbols 

///////////////////////////////////////////////////////////////////////////// 
// CSaApp: 

// See sa.cpp for the implementation of this class 
// 



class CSaApp : public CWinApp 

public : 
CSaApp () ; 

// Overrides 

// ClassWizard generated virtual function overrides 

//{ {AFX_VIRTUAL (CSaApp) 

public: 

virtual BOOL Initlnstance ( ) ; 
//} }AFX_VIRTUAL 

// Implementation 

//{ {AFX_MSG (CSaApp) 

// NOTE - the ClassWizard will add and remove member functions here. 

// DO NOT EDIT what you see in these blocks of generated code ' 
//} }AFX_MSG 
DECLARE_MESSAGE MAP ( ) 



///////////////////////////////////////////////////////////////////////////// 
//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
Sendif // | defined (AFX_SA_H_33D93B09_DOB8_11D2_9GEE_006097CDB9E2_INCLUDED_) 
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// sa.cpp : Defines the class behaviors for the application. 

((include "stdafx.h" 

((include "sa.h" 

((include "saDlg.h" 

((include "TabDialog .h" 

((include "I2CDialog.h" 

((include "DSP56kManager .h" 

CDSP56kManager *g_DSPManager ; 

#ifdef _DEBUG 
#define new DEBUG_NEW 
#undef THIS_FILE 

static char THIS_FILE[J = FILE 

(fendif ~~' 

'ii'csJJJJ"""""' "' 'i' 'iii'iiii'iiiiiiiiii/iiiiiiiiiim/i/ 

BEGIN_MESSAGE_MAP (CSaApp, CWinApp) 
//{ {AFX_MSG_MAP (CSaApp) 

// NOTE - the ClassWizard will add and remove mapping macros here 

//}}AFX MSG N0T EDIT Wh3t in thCSe bl ° CkS ° f 9 enerated code! 

ON_COMMAND ( ID_HELP , CWinApp : : OnHe lp ) 
END_MESSAGE_MAP ( ) 

'/' 'JJ 'J ' '' '' '' 11 ' 1 1 1 1 ' * I H I J 1 1 1 1 ' 1 1 1 1 1 1 1 1 1 1 ' 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 11 / 1 1 
II CSaApp construction 

CSaApp : : CSaApp ( ) 
{ 

// TODO: add construction code here, 

// Place all significant initialization in Initlnstance 



1 1 / 1 J 1 1 1 1 1 1 1 1 II 1 1 / 1 1 1 1 1 1 1 1 1 1 / 1 1 1 1 1 1 1/ 1 1 / 1 1 1 1 / 1 / 1 / ,/, I , l ,,,,,,,, i Ul , 
II The one and only CSaApp object 

CSaApp theApp; 

BOOL CSaApp: : Initlnstance () 

AfxEnableControlContainer () ; 
// Standard initialization 

// If you are not using these features and wish to reduce the size 
// of your final executable, you should remove from the following 
// the specific. initialization routines you do not -need. - - - .- . 

#ifdef _AFXDLL 

Enable3dControls(); // Call this when using MFC in a shared DLL 

Seise 

Enable3dControlsStatic(); // Call this when linking to MFC statically 
(fendif 1 

II Set dialog background color to black 
// SetDialogBkColor (RGB (0, 0, 0) , RGB (255 , 255 , 255 ) ) ; 

int response,- 
CI2CDialog idlg; 
try 



if( (response = idlg . DoModal ( ) ) != IDOK ) 



if( response == idabort ) 
{ 

AfxMessageBox( "Trouble initializing") ; 
Sleep(lOOO) ; 

) 

// return FALSE; 

} 

} 

catch (CException* e ) 
{ 

// print f ("Trouble initializing\n") ; 

// Sleep(lOOO) ; 

return FALSE ; 

■ }• 



// CSaDlg dig; 
CTabDialog dlg; 

m_pMainWnd = &dlg ; 

int nResponse = dig .DoModal ( ) ; 

if (nResponse == IDOK) 

{ 

// TODO: Place code here to handle when the dialog is 
// dismissed with OK 

} 

else if (nResponse == IDCANCEL) 

// TODO : Place code here to handle when the dialog is 
// dismissed with Cancel 

} 

// Since the dialog has been closed, return" FALSE so that we exit the 
// application, rather than start the application's message pump, 
return FALSE : 
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//{ {NO_DEPENDENCIES} } 
// Microsoft Developer Studio generated include file. 
// Used by sa.rc 
// 



»ucj.j.nc lun AoUUIdOX 


0x0010 




100 


itflof TYIO TnO ADfM TPD/^V 

tru,c i. me iuo AiJUUiDUA 


101 


trucxxiic 1UU ort UXAXiUCj 


102 


iff? o t 7 t no TnD MSTMrDAMr 
trUCXXilc X UK PLrtXlNr K-AJMh. 


128 


Jii^pf ino Tnn riT7\T /"v* t 

rrU.ci.XIlc XLIU UXAXXXjX 


129 


if «» f" i no Tnn DDT 

ftuciine xuu trfx 


130 


^ o f i n q Tnn Mn»xTr t-t 


130 


frUcXXIlc XUU ctfZ 


131 


RUcx ilic 1UU fir J 


132 


if tic x me XUU f f 4 


133 


if r? ci f" 1 T"l O Tnn DDE 
trUC i, Xilc J. UU rrj 


134 


4ff^of-ino t nn TiVif 
tru.cl-J.llc XUU Jrro 


135 


ff H #=> f" 1 n P TFin DD"7 


136 


JiHof l'no Tnn DCO 
tru.ci.xiic XUU rro 


137 


ifri F "i n o Tnn D DQ 
tru.c x xne x UD ccs 


138 


trU-C x xne XUU U X A 1 tt, X 7 x 


139 


(tucLiae XUU JJXAliOGo 


140 


if a t 7 1 no Tnn n t j\ t * 
ttUCLHie XUU U 1 A 1 i( X -.4 


141 


true x xne iuu f fx 0 


142 


ftuctine xuu f f 1 X 


143 


ftdef ine IDC BUTTONX 


1001 


true c xne xjjl. dUxTON2 


1002 


ftuetine xuu oXil UER1 


1004 


#def xne IDC CHECK1 


1005 


#def ine IDC_SLIDER2 


1005 


#def xne IDC SLIDER3 


1006 


^define IDC RADIOX 


1006 


#define IDC SLIDER4 


1007 


#define IDC . CHECK2 


1007 


^define IDC RADI02 


1007 


#def ine IDC EDITX 


1007 


true x xiic X Ut_ b Li xUbiR 5 


1008 


ffuetine xlji_ (_HECK3 


1008 


it/T'ot^ino Tnp DT\nrm 
ttUCLlue 1IJU KAJJ1UJ 


1008 


rttlcxxne IDC oXjIDERo 


1009 


nnpt" i no TTlP CU'cr^v* 
rru.ejLjLi.ic llJL L.rlr*CK.4 


1009 


#define IDC RADI04 


1009 


#define IDC_SLIDER7 


1010 


#define IDC_CHECK5 


1010 


#define IDC__SLIDER8 


1011 


#define IDC_CHECK6 


1011 


#define IDC_SL,IDER9 


1012 


#de f ine IDC_CHECK7 


1013 


#define ID_MENUITEM32 771 


32771 


#define ID_MENUITEM32772 


£ 32772 


#define I D_F I LE__EXPORTPARAMF I LE 


32773 



// Next default vaiues for new obiects 
// 

#ifdef APSTUDIO_INVOKED_ 
ffifndef APSTUDI0_READ0NLY_SYMBOLS 
#define _APS_NEXT_RESOURCE_VALUE 
#define _APS_NEXT_COMMAND_VALUE 
#define _APS_NEXT_CONTROL_VALUE 
#define _APS_NEXT_SYMED_VALUE 
#endif 
#endif 




142 
32774 
1011 
103 




Sif I defined (AFX_TABDIALOG_H 5CB3DF04_D2 0F_11D2_96EE_00 6097CDB9E2 INCLUDED_) 

Sdef ine AFX_TABDIALOG_H 5CB3DF04_D2 0F_11D2_96EE_00 6097CDB9E2 INCLUDED_ 

Sif _MSC_VER >= 1000 
((pragma once 

#endif // _MSC_VER >= 1000 
// TabDialog.h : header file 
// 

((include "Pagel.h" 
Sinclude "MainPage.h" 
((include "DDX.h" 
((include "NotchPagel . h" 
((include "NotchPage2 . h" 
Sinclude "StWaveRe j Page .h" 
((include "ShelvPage .h" 
Sinclude "NewCutof f Page .h" 
Sinclude "AllpassPage .h" 
Sinclude "DBNotch.h" 

///////////////////////////////////////////////////////////////////////////// 
// CTabDialog dialog 



class CTabDialog : public CDialog 
{ 

// Construction 
public : 

void DisplayI2CState (long error); 

virtual void SetStatusString (int which, CString &s) ; 
CTabDialog (CWnd* pParent = NULL) ; // standard constructor 

// Dialog Data 

//{ (AFX_DATA (CTabDialog) ' 
enura { IDD = IDD_DIALOGl } ; 

// NOTE: the ClassWizard will add data members here 
//}}AFX_DATA 



// Overrides 

// ClassWizard generated virtual function overrides 

//{ {AFX_VIRTUAL (CTabDialog) 

protected: 

virtual void DoDataExchange (CDataExchange* pDX) ; // DDX/DDV support 
//} }AFX_VIRTUAL 

// Implementation 
protected: 

virtual void DisplayMode (int) ; 



CStatusBar 
CPropertySheet 
HI CON 
// CPagel 
-CMainPage 
CDDX 

CNotchPagel 
CNotchPage2 
CStWaveRe j Page 
CShelvPage 
// CCutoffPage 
CNewCutof f Page 
CAllpassPage 
CDBNotch 
CBrush 
UINT 
BOOL 
int 
int 



m_StatusBar ; 
m_dlgPropSheet ; 
m_hIcon; . 

m_Pagel; 
m_MainPage ; 
m_DDXPage ; 
m_NotchlPage ; 
m_Notch2Page ; 
m_StWaveRej Page ; 
m_ShelvPage ; 

m_Cutof f Page ,- 
m_Cutof f Page ; 
m_AllpassPage ; 
m_DBNotch; 
m_brush; 
m_timerID; 
m_HDCDD i s p 1 ay ; 
m_AIdx, m_ICnt ; 
m ErrorCounter ; 



// Generated message map functions 
//{ {AFX_MSG (CTabDialog) 
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virtual BOOL OnlnitDialog ( ) , 
afx_msg void OnSysCommand(uiNT nID, LP ARAM lParam) ; 
afx_msg void OnPaintO; 
afx_msg HCURSOR OnQueryDraglcon ( ) ,- 
afx_msg void OnCloseO; 
afx_msg void OnMove(int x, int y) ; 

afx_msg HBRUSH OnCtlColor (CDC* pDC, CWnd* pWnd, UINT nCtlColor) 

af x_msg void OnOpenMenu ( ) ; 

afx_jnsg void OnSaveMenu ( ) ; 

afx_rasg void OnTimer (UINT nIDEvent) ; 

afx_msg void OnFileExportparamf ile ( ) ; 

//)}AFX_MSG 

DECLARE MESSAGE MAP ( ) 



// { {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // !defined(AFX_TABDIALOG_H_5CB3DF04_D20F_llD2_96EE_006097CDB9E2 INCLUDED ) 
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// TabDialog.cpp : implementation file 
// 



ffinclude "stdafx.h" 

# include "sa.h" 

ffinclude "TabDialog.h" 

ffinclude "DSP56kManager .h" 

#include "I2CCommErrorDialog.h" 

ffinclude <afxdlgs.h> 

ffifdef _DEBUG 
((define new DEBUG_NEW 
ffundef THIS_FILE 

static char THIS_FILE[] = FILE 

ffendif 



ffdefine TIMERID 1 

ffdefine ID_HDCD_DETECT 56000 

#define ID_ERROR_DISPLAY (ID_HDCD_DETECT+1) 

static UINT auIDStatusBar [] = { 
ID_SEPARATOR, 
ID_HDCD_DETECT , 
ID_SEPARATOR, 
ID_ERROR_DISPLAY 

}; 



#define AARRAYSIZE IS 

static char *Detect_Array [AARRAYSIZE] 
" HDCD" 
" HDCD " 

" HDCD " 

" HDCD " 

" HDCD " 

" HDCD " 

" HDCD <• 

" HDCD " 

" HDCD 
" HDCD 

" HDCD " 
" HDCD " 
"HDCD 

"DCD H" 
"CD HD" 
"D HDC" 



= { 



1 1 CTabAboutDlg dialog used for App About 
class CTabAboutDlg : public CDialog 

public: 

CTabAboutDlg () ; 

// Dialog Data 

// { {AFX_DATA (CTabAboutDlg) 
enum { IDD = IDD_ABOUTBOX } ; 
//})AFX DATA 



// ClassWizard generated virtual function overrides 

//{ (AFX_VIRTUAL (CTabAboutDlg) 

protected: 

//nAFijlRTUAT DataEXChan9e<CDataEXChan9e * PDX>; ^ DDX/DDV SUPP ° rt 

// Implementation 
protected: 

//{ {AFX_MSG (CTabAboutDlg) 
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//}}afx_msg 
declare_message_map ( ) 

CTabAboutDlg: : CTabAboutDlg ( ) : CDialog (CTabAboutDlg : : IDD) 

//{ {AFX_DATA_INIT(CTabAboutDlg) 
// ) } AFX_DATA_INIT 

void CTabAboutDlg: : DoDataExchange (CDataExchange* pDX) 

CDialog: : DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CTabAboutDlg) 
/ / } } AFX_DATA_MAP 

BEGIN_MESSAGE_MAP (CTabAboutDlg, CDialog) 

//{ {AFX_MSG_MAP (CTabAboutDlg) 
//No message handlers 

//} }AFX_MSG_MAP 
END_MESSAGE_MAP ( ) 

y/cJ£A / JiJ q ,/ A , Ao S ///,/,/,/,/,//,/ " 

CTabDialog: : CTabDialog (CWnd* pParent /*=NULL*/) 
^ : CDialog (CTabDialog :: IDD, pParent) 

//{ {AFX_DATA_INIT (CTabDialog) 

// NOTE: the ClassWizard will add member initialization here 
//} }AFX_DATA_INIT 

m_hIcon = AfxGetApp ( ) ->LoadIcon ( IDR_MAINFRAME) ; 



void CTabDialog: : DoDataExchange (CDataExchange* pDX) 

CDialog: : DoDataExchange (pDX) ; 
//{ {AFX_DATA_MAP (CTabDialog) 

// NOTE: the ClassWizard will add DDX and DDV calls here 
/ / } } AFX_DATA_MAP 



BEGIN_MESSAGE_MAP (CTabDialog, CDialog) 
//{ {AFX_MSG_MAP (CTabDialog) 
ON_WM_SYSCOMMAND ( ) 
ON_WM_PAINT ( ) 
ON_WM_QUER YDRAG I CON ( ) 
ON_WM_CLOSE ( ) 
ON_WM_MOVE ( ) 
ON_WM_CTLC0LOR ( ) 

ON_COMMAND ( ID_MENUITEM32771 , OnOpenMenu) 
ON_C0MMAND ( iD_MENUITEM32772 , OnSaveMenu) 
ON_WM_TIMER ( ) 

ON COMMAND ( ID_F ILE_EXPORTPARAMF ILE , OnFileExportparamf ile) 
// } } AFX_MSG_MAP 
END_MESSAGE MAP() 



// CTabDialog message handlers '"'""""""I" I ' 1 1 u 1 1 1/ 1 ///////// / 

#define PS_width 222 
#define PS_HEIGHT 215 

BOOL CTabDialog :: OnlnitDialog ( ) 

int partsListO = { 50, 100, 150, -l} ; 0096 
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CDialog: : OnlnitDialog () ; 

// Add "About..." menu item to system menu. 

// IDM_ABOUTBOX must be in the system command range 
ASSERT ( ( IDM_ABOUTBOX & OxFFFO) == IDM_ABOUTBOX) • 
ASSERT ( IDM_ABOUTBOX < OxFOOO) ; 

CMenu* pSysMenu = GetSystemMenu (FALSE) ; 
if (pSysMenu != NULL) 
{ 

CString strAboutMenu; 

strAboutMenu. LoadString(IDS_ABOUTBOX) ; 
if (! StrAboutMenu. IsEmpty () ) 

pSysMenu- >AppendMenu (MF_SEPARATOR) ; 
^ pSysMenu ->AppendMenu (MF_STRING, IDM_ABOUTBOX, StrAboutMenu); 

} 

// th = icon f or this dialog. The framework does this automatically 

// when the application's main window is not a dialog 
SetIcon(m_hIcon, TRUE); // set big icon 

SetIcon(m_hIcon, FALSE) ; // Set small icon 

// build brush 

m_brush.CreateSolidBrush(RGB(0, o, 0) ) ; 
// build prop sheet . 

m_dlgPropSheet.AddPage (&m_MainPage) ; 
m_dlgPropSheet .AddPage <&m_DDXPage) ; 
m_dlgPropSheet .AddPage (&m_ShelvPage) ; 
m_dlgPropSheet .AddPage (&m_Cutoff Page) 
m_dlgPropSheet .AddPage (&m_NotchlPage) 
m_dlgPropSheet. AddPage (&m_Notch2Page) , 
m_dlgPropSheet .AddPage (&m_StWaveRej Page) ; 
m_dlgPropSheet .AddPage (&m_AllpassPage) ; 
m_dlgPropSheet .AddPage (&m_DBNotch) ; 

m_dlgPr 9 pSheet. Create (this, WS_CHILD | WS_VISIBLE, o) - 
ra_dlgPro P Sheet.ModifyStyleEx(0, WS_EX_CONTROLPARENT) ; ' 
m_dlgPropSheet.ModifyStyle (0, WS_TABSTOP) ; 

m_dlgPropSheet.SetWindowPo S (NULL, 0, 0, PS_WIDTH. PS_HEIGHT, SWP_NOZOR D ER | SWP_NOSIZE | SWP_NOACTIVATE ) 

// resize dialog to fit propsheet exactly 
RECT rect; 

m_dlgPropSheet.GetWindowRect (&rect) ; 
//rect. bottom += 14; 
//rect. right += 14; 

SetWindowPosUwndBottom.rect. left. rect. top. rect. right, rect .bottom, S W P_ N o 2 ORD E R | SWP_NOKOVE > ; 

// Add status bar 

RECT sizerect; 

sizerect.top = PS_HEIGHT; 

sizerect. bottom «= sizerect.top + 20; 

sizerect. left = 0; 

sizerect. right = PS_WIDTH ; 

//m_StatusBar. Create (WS_CHILD | WS_VISIBLE | CCS BOTTOM , sizerect , this AFX IDW STATUS R ar > 
//m_StatusBar.ShowWindow(sw_SHOWNA) ; afx_idw_STATUS_bar ) ; 

/ /m_StatusBar . SetSimple ( ) ; 

//m_StatusBar.SetText ("Hello world! ", 255 , 0) ; 
m_StatusBar. Create ( this ) ; 

//m_StatusBar.SetIndicators(auIDStatusBar. sizeof (auIDStatusBar) /sizeof (UINT) ) • 
//»_St«tU8Bar.SetPaneInfo(0. m_StatusBar .GetltemID (0) . SBPS STRETCH NULL T 
//m_StatusBar.GetStatu S BarCtrl(,.SetText( "Hello world! ", 0, of; 

CRect rcClientStart; 

CRect rcClientNow; _ 
GetClientRect (rcClientStart) ; 0 0 9 ( 




RepositionBars (AFX_IDW_cONTROLBAR_FIRST, AFX_IDW_C0NTROLBAR_LAST 
0, reposQuery, rcClientNow) ; 

// Now move all the controls so they are in the same relative 
// position within the remaining client area as they would be 
// with no control bars. 
/* CPoint ptOffset (rcClientNow. left - rcClientStart . lef t , 
rcClientNow. top - rcClientStart . top) ; 

CRect rcChild; 

CWnd* pwndChild = GetWindow (GW_CHILD) ; 

while (pwndChild) 

{ 

pwndChild- >GetWindowRect (rcChild) ; 
ScreenToClient (rcChild) ; 
rcChild. Of fsetRect (ptOff set) ; 
pwndChild- >MoveWindow (rcChild, FALSE) ; 
pwndChild = pwndChild- >GetNextWindow ( ) • 
} V 

// Adjust the dialog window dimensions 
CRect rcWindow; 
GetWindowRect (rcWindow) ; 

rcWindow. right += rcClientStart . Width ( ) - rcClientNow. Width( ) ■ 
rcWindow. bottom += rcClientStart .Height ( ) - rcClientNow. Height () ; 
rcWindow. bottom += 5; 
MoveWindow (rcWindow, FALSE); 

// And position the control bars 

RepositionBars (AFX_IDW_CONTROLBAR_FIRST, AFX_IDW_CONTROLBAR_LAST, 0) ; 
m_timerID = 0; 

m_timerID = SetTimer (TIMERID, 50, NULL) ; 
m_ErrorCounter = p;. 

m_HDCDDisplay = false; 
DisplayMode (1) ; 
SetWindowText ( "Untitled" ) ; 
partsList[0] = rcClientNow. Width () /4 ; 

partsList[l] = partsList [0] + (rcClientNow. Width () /4) ; 
partsList[2] = partsList [1] + (rcClientNow. Width () /4) • 
partsList [3] = -l; 

m_StatusBar . GetStatusBarCtrl ( ) . SetParts ( sizeof (partsList) /sizeof (int)' , partsList) 



turn TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION: OCX Property Pages should return FALSE 



void CTabDialog : : OnClose ( ) 
{ 

// if( m_Pagel ) 

// delete m_Pagel; 

// if( m_Page2 ) 

// delete m_Page2; 

// iff m_Page3 ) 

// delete m_Page3 ; 

if( m_timerID ) 

KillTimer( m_timerID ) ; 

delete g_DSPManager ; 

CDialog: : OnClose () ; 
} . 

void CTabDialog: : OnSy sCommand ( UINT nID, LPARAM lParam) 
if ( (nID t OxFFFO) == IDM_ABOUTBOX) 
CTabAboutDlg dlgAbout; 
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dlgAbout . DoModal ( ) 
) 

else 
{ 

CDialog: .-OnSysCommand (nID, lParam) ; 

) 

void CTabDialog :: OnPaint ( ) 
{ 

// CPaintDC dc(chis); // device context for painting 
// TODO: Add your message handler code here 
// Do not call CDialog: : OnPaint () for painting messages 

if (IsIconicO) 
{ 

CPaintDC dc(this); // device context for painting 
SendMessage(WM_ICONERASEBKGND, (WPARAM) dc . GetSaf eHdc ( ) , 0) 

// Center icon in client rectangle 

int cxlcon = GetSystemMetrics (SM_CXICON) ; 

int cylcon = GetSystemMetrics (SM_CYIC0N) ; 

CRect rect; 

GetClientRect (trect) ; 

int x = (rect.Widthf) - cxlcon + 1) / 2; 
int y = { rect. Height () - cylcon + 1) / 2; 

// Draw the icon 
^ dc.DrawIcon(x, y, m_hIcon) ; 

else 
{ 

//m_StatusBar . RedrawWindow ( ) ; 
CDialog : : OnPaint ( ) ; 



yoid CTabDialog: :OnMove (int x, int y) 
CDialog: :0nMove (x, y) ; 

// TODO: Add your message handler code here 

} 

// The system calls this to obtain the cursor to display while the user drags 
// the mxmmized window. 
HCURSOR CTabDialog : : OnQueryDraglcon ( ) 

return (HCURSOR) m hlcon 



} 

HBRUSH CTabDialog: :OnCtlColor (CDC* P DC, CWnd* pWnd, UINT nCtlColor) 

HBRUSH hbr = CDialog: : OnCtlColor (pDC, pWnd, nCtlColor) ; 
// TODO: Change any attributes of the DC here 

//TODO: Return a different brush if the default is not desired 

return hbr; 
#if 0 

return m_brush; 
ftendif 
} 

void CTabDialog: :0nOpenMenu () 

( 0099 



// TODO: Add your command handler code here 
// char BASED_C0DE szFilterU = "Text Files (*.txt)|* txt I I • 
// CFileDialog fileDlg (TRUE , NULL, NULL, OL, szFilter, NULL) ; 

// CFileDialog fileDlg (TRUE) ; 

CFileDialog fileDlg (TRUE, " txt NULL, OFN_HIDEREADONLY, "Text Files (. . txt) | * . txt | All Files (* . *) | * . . | | . , this) 

if( f ileDlg.DoModal () == IDOK ) 
{ 

int array_size =0;. 
CString string; 
CStringArray array; 

CStdioFile file(fileDlg.GetPathName(),CFile: :modeRead | CFile :: typeText) • 
while! f lie. ReadString (string) ) yy ' ' 

array. SetAtGrow (array_size , string ) ; 
array_size++ ; 

} 

g_DSPManager->SetDSPSettings (array) ; 
SetWindowText (fileDlg. GetFileName () ) ; 

// MM 5/13/99 Invalidate the window so that window is redrawn 
Invalidate (false) ; 

' } 
} . 

void CTabDialog: :OnSaveMenu() 

// TODO: Add your command handler code here 
_ CFileDialog fileDlg (FALSE, " txt " , NULL, OFN_0VERWRITEPROMPT | OFN__HIDEREADONLY, "Text Files (*. txt) | *. txt | | this 

if( f ileDlg.DoModal () == IDOK ) 

int array_index = o ; 
CString string; 
CStringArray array; 

g_DSPManager->GetDSPSettings (array) ; 

„hn^ FUe file ' fileD1 9- GetPathName (), CFile: :modeCreate | CFile : :mod eW rite | CFile •• typeText) ■ 
while ( array_mdex < array. GetSize () ) cypeiextj , 

string = array . GetAt (array_index) ; 
file.WriteStringt string) ; 
file.WriteString("\n") ; 
array_index++ ; 

} 

} 

void CTabDialog: :OnFileExportparamfile() 

this^ e ° ial ° 9 fileDl9(F ^ SE '" P ™"^ L ' O ™- 0VERW KIT E P R 0 M PT|OFN_HIDEREADONLY, "Parameter Files Cprm) | ..prm| | 
ifj fileDig.DoModal () == IDOK ) . • 

int array_index = 0; 
CString string; 

CStringArray array; * " 

g_DSPManager->GetFilterBlob (array) ■ 

wSefarray^ ' CFile : :mode„rite , CFile :: typeBinary, ; 

string = array . GetAt (array_index) ; 
file.WriteString(string) ; 

f ile.WriteString("\n") ; A -5 «~i rj 

array_index++; UiUU 




} 

} 

void CTabDialog: lOnTiraer (UINT nIDEvent) 
{ 

// TODO: Add your message handler code here and/or call default 
if( nIDEvent == TIMERID ) • 
{ 

DisplayMode (g_DSPManager->GetHDCDMode () ) ; 
DisplayI2CState (OL) ; 

} 

else 
{ 

CDialog: : OnTimer (nIDEvent) ; 

' } 



} 

void CTabDialog: : DisplayMode (int value) 



if( value < 0 ) 
{ 

DisplayI2CState (-value) ; 

/* char s [100] ; 

sprintf (s, "0x%x", -value) ; 

m_StatusBar.GetStatusBarCtrl () . SetText (s, 3 , 0) ; */ 
/* iff m_timerID ) 

KillTimert m_timerID ) ; 
CI2CComraErrorDialog dig; 
char s [100] ; 

sprintf (s, "Ox%x", -value) ; 

dig . m_ErrorCode = s; 

if( dig . DoModal ( ) == IDCANCEL ) 

EndDialog ( IDCANCEL) ; 
else 

m_timerID = SetTimer (TIMERID, 50, NULL) ; */ 

} 

else if( value ) 
{ 

if ( !m_HDCDDisplay ) 
{ 

m_ICnt = 0 ,- 
m_AIdx = 0; 

m_StatusBar.GetStatusBarCtrl() . SetText (Detect_Array [m_AIdx++] , 1, o) ; 
^ t //SetWindowText(Detect_Array[ra_AIdx++] ) ; 

else 

{ • 
m_ICnt++; 
if( m_ICnt > 5 ) 
{ 

m_ICnt = 0; 

ra_StatusBar .GetStatusBarCtrl () . SetText (Detect_Array [m_AIdx++] ,1,0) 
//SetWindowText(Detect_Array [m_AIdx++] ) ; 
if ( m_AIdx >= AARRAYSIZE ) 
m_AIdx =0; 

} 

} 

m_HDCDDisplay = true; 

} 

else 
{ ' 

if ( m_HDCDDisplay ) 

m_StatusBar .GetStatusBarCtrl () . SetText ( "BAD CD. .NO DONUT" ,1,0) ; 

//SetWindowText ( "BAD CD .. NO DONUT") ; 
m_HDCDDisplay = false; 
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Id CTabDialog: : SetStatusString ( int which, CStri: 
<_StatusBar. GetStatusBarCtrl <) . SetText (s , 0 , 0) ; 



void CTabDialog: :DisplayI2CState (long error) 

if ( error ) 
{ 

char s [100] ; 

'sprint f (s , " dx%x" , error) ; 

m_StatusBar.GetStatusBarCtrl{) .SetText (s 3 0) • 
m_ErrorCounter = 100; // 5 seconds 



else 





i_StatusBar -GetStatusBarCtrl { ) . SetText ( "Transmitti 



. .",3,0) ; 



else 



i_StatusBar. GetStatusBarCtrl () . SetText <"", 3 , 0) ; 
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^%- def ^v d<AFX - STWAVER ^^ E - H — ° CF7E209 - D79 ° 1102 96EE 006097cJBf INCLUDED ) 
Sdefine AFX_STWAVEREJ P AG E X_0CF7E209_D790_llD2:9 6 EE:00S0?7CDB9 E 2_3ic L TbED 

fiif _MSC_VER >= 1000 
flpragma once 

#endif // _MSC_VER >= looo 

// StWaveRejPage.h : header file 

// 



class CTabDialog; 

class CStWaveRej Page : public CPropertyPage 

DECLARE_DYNCREATE (CStWaveRej Page) 

// Construction 
public : 

CStWaveRej Page () ; 

-CStWaveRej Page { ) ; 

// Dialog Data 

//{ {AFX_DATA (CStWaveRej Page) 
enum { IDD = IDD_PP5 } ■ 
CButton m_BypassButton; 
CSliderCtrl m_Notch3BoostSlider ; 
CSliderCtrl m_Notch3QSlider ; 
CSliderCtrl m_Notch2CutSlider ; 
CSliderCtrl m_Notch2QSlider ,- 
CSliderCtrl m_Notch2FreqSlider ; 
CSliderCtrl m_NotchlCutSlider ; ' 
CSliderCtrl m_NotchlQSlider ; 
CSliderCtrl m_NotchlFreqSlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFXJVIRTUAL (CStWaveRej Page) 

protected: 

v / ^lj^^ t ^^^ c ^^^9^ PDX); " DDX/DDV support 

// Implementation 
protected: 

/ / Generated message map functions 

//{ {AFX_MSG (CStWaveRej Page) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg void OnVScroll (UINT nSBCode. UINT nPos, CScrollBar* pScrollBar) 

afx_msg void OnShowWindow ( BOOL bShow, UINT nStatus) • 

af x_msg void OnPaint ( ) ; 

afx_msg void OnBypassO ; 

//}}AFX_MSG 

DECLARE_MESSAGE MAP ( ) 



CTabDialog *m_ParentWindow; 
void SendStringToUKint which); 



}; 



//{ {AFX_INSERT_LOCATION} } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ' defined (AFX_STWAVER EJ PAGE_H_OCF7E209_D790_11D2_96EE_006097CDB9E2_INCLUDED_) 
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// acwaveKejfage. cpp 
// 



^^^^nentation ^^^^ 



# include "stdafx.h" 

Sinclude "sa.h" 

Sinclude "StWaveRej Page .h" 

^include "TabDialog.h" 

# include "DSP5 6kManager .h" 

(Jifdef _DEBUG 
ffdefine new DEBUG NEW 
Sundef THIS_FILE 

static char THIS_FILE[] = FILE 
#endif 




IMPLEMENT_DYNCREATE (CStWaveRej Page , CPropertyPage) 

CStWaveRej Page = : CStWaveRej Page ( ) : CPropertyPage (CStWaveRej Page : : IDD) 

// { { AFX_DATA_INIT (CStWaveRej Page ) 
//}}AFX_DATA INIT 

} ~ - 

CStWaveRej Page : : -CStWaveRej Page ( ) 
} 

void CStWaveRej Page : : DoDataExchange (CDat a Exchange* pDX) 

CPropertyPage: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CStWaveRej Page) 
DDX_Control(pDX, IDC_CHECK5, m_BypassButton) ■ 
DDX_Control (pDX, IDC_SLIDER9, m_Notch3BoostSlider) ■ 
DDX_Control(pDX, IDC_SLIDER8, m_Notch3QSlider) • 
DDX_Control(pDX, IDC_SLIDER6, m_Notch2CutSlider) • 
DDX_Control( P DX, IDC_SLIDER5, m_Notch2QSlider) • 
DDX_Control (pDX, IDC_SLIDER4, m_Notch2FreqSl ider) • 
DDX_Control (pDX, IDC_SLIDER3, m_NotchlCutSlider) • ' 
DDX_Control (pDX, IDC_SLIDER2, tnJIotchlQSlider) ■ ' 
DDX Control (pDX. IDC_SLIDER1 m NotchlFreqSlider) • 
//}}AFX_DATA_MAP ~~ 



BEGIN MESSAGE_MAP(CStWaveRejPage, CPropertyPage) 
/ / { { AFX_MSG_MAP (CStWaveRejPage) 
ON_WM_VSCROLL ( ) 
ON_WM_SHOWWIND0W ( ) 
ON_WM_PAINT ( ) 

ON_BN_CLICKED(IDC_CHECKS, OnBypass) 
//}}AFX_MSG_MAP 
END_MESSAGE MAP ( ) 



// CStWaveRejPage message handlers 
BOOL CStWaveRejPage: :OnInitDialog() 
CPropertyPage: :OnInitDialog () ; 



// TODO: Add extra initialization here 
ra_NotchlFreqSlider . SetRange (0, CONTROL_RANGE) • 

m_NotchlFreqSlider.SetPageSi 2 e(PG_CONTROL_AMT) ; 
m_NotchlQSlider . SetRange ( 0 , CONTROL_RANGE) • 



m_NotchlQSlider.SeCPag^^P(PG_CONTROL_AMT) ; 




m_NotchlCutSlider .SetRange (0,CONTROL_RANGE) • 

m_NotchlCutSlider . SetTicFreq ( (CONTROL_RANGE+l) /is J ; ueiwioccMCut) ) , 

m_NotchlCutSlider.SetPageSize(PG_CONTROL_AMT) ; 

ra_Notch2FreqSlider.SetRange(0,CONTROL_RANGE) • 

!-^^p req c, X -H e r ' SetP ° S '^^-^^-S-DSPManager^GeCParamValue (XNotch4Freq) ) 
m_Notch2FreqSlider.SetTicFreq((CONTROL_RANGE+l)/16); 9 " 
m_Notch2FreqSlider . SetPageSize (PG_CONTROL_AMT) ; 

m_NoCch2QSlider.SetRange(0,CONTR0L_RANGE) • 

"-r^t^c^f r " SetP ° E (C0NTR0L -^ GE -3- D SPMana 9 er->GetPararnValue Ck N otch4Q) ) • 
m_Notch2QSlider.SetTicFreq( (C0NTR0L_RANGE+1) /16) ; 

m_Notch2QSlider. SetPageSize (PG_CONTROL_AMT) ; 
m_Notch2CutSlider. SetRange ( 0 , CONTROL_RANGE ) • 

m_Nptch2CutSlider.SetTicFreq((CONTROL_RANGE+l)/16) ; ' 
m_Notch2CutSlider.SetPageSize(PG_C0NTR0L_AMT) ; 

m_Notch3QSlider . SetRange ( 0 , CONTROL_RANGE ) • 

m_Notch3QSlider. SetTicFreq ( (C0NTR0L_RANGE+1) /is) ; 
m_Notch3QSlider . SetPageSize ( PG_CONTROL_AMT) ; 

m_Notch3BoostSlider.SetRange(0,CONTROL_RANGE) ■ 

m_Notch3BoostSlider.SetPos(CONTROL_RANGE-g_DSPManager->GetParamValue(kNotch5Cut)) 
m_Notch3BoostSlider. SetTicFreq! ( C0NTROL_RANGE + 1 ) /IS) . (KNotchSCut) ) , 

ra_Notch3BoostSlider. SetPageSize (PG_CONTROL_AMT) ; 



m_ParentWindow = (CTabDialog *) GetParent () ->GetParent () ; 

return TRUE; // return TRUE unless you set the focus to a control 
// EXCEPTION : OCX Property Pages should return FALSE 

void CStWaveRe j Page : : SendStringToUI (int which) 



CString str,- 



g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString(0, str) ; 



} 



void CStWaveRej Page:: OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

// TODO: Add your message handler code here and/or call default 
CSliderCtrl 'slider = (CSliderCtrl *) pScrollBar ■ 
int which; 



CPropertyPage : : OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep (50); 

if( slider == &m_NotchlFreqSlider ) 

which = kNotch3Freq ; 
else if( slider == &m_NotchlQSlider ) 

which = kNotch3Q; 
else iff slider == &m_NotchlCut Slider ) 

which = kNotch3Cut; 
else if( slider == &m_Notch2FreqSlider ) 

which = kNotch4Freq; 
else if ( slider == &m_Notch2QSlider ) 

which = kNotch4Q; 
else if ( slider == &m_Notch2CutSlider ) 

which = kNotch4Cut; 
else if( slider == &m_Notch3QSlider ) 

which = kNotch5Q; 
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else if( slider == 6raJ^B l3Boost:S iider ) 

which = kNotch5Cut; 
else 

return; 

g_DSPManager- >SetParamValue (CONTROL RANGE- slider- >GetPos ( ) which) • 
SendStrmgToUI (which) ; ~ 

} 

void CStWaveRej Page : : OnShowWindow (BOOL bShow. UINT nStatus) 
CPropertyPage: :OnShowWindow(bShow, nStatus) ; 
// TODO: Add your message handler code here 

) 

void CStWaveRej Page:: OnPaintO 

CPaintDC dcfthis); // device context for painting 
// TODO: Add your message handler code here 

m-Mo^Mno^ Ud c r ' Set ! OS (C0NTR0L - RANGE -9- D SPManager->GetParamValue <kNotch3Freq) ) - 
S ' S6tPOS (CONTROL - RANGE -9-^PManager->GetParamValue (kNotch3Q) > ■ ' 
m.KotchlCutSlider .SetPos (CON T ROL_RA N GE-g_DSPManager->GetParamValue (kNotcWCut) ) ; 

m^ot^n^^T - SetP ° S (C0NTR0I '- RAHGE -9- D SPManager->GetParamValue (kNotch4Freq) ) - 
I"L r " OS < C0NT ^-RANGE-g_DSP M anager- > GetPara m Value (kNotch4Q> ) ' 

m.NotchaCutSlider .SetPos (CO NT ROL_RA N GE-g_DSPMana 9 er->GetParamValue (kNotcMCut) ) ; 

Ud e^f tP ° S (C0NTR0L - RANGE -9- D S^nager->GetParamValue (kNotchSQ) ) • 
«Notch3Boo 8t SUder. SetPos (CONTROL_RA N G E -g_D S PManager->GetParamValue (kNo^cnSCut) ) ; 

// Do not call CPropertyPage : .-OnPaint ( ) for painting messages 



void CStWaveRej Page : .-OnBypass () 

// TODO : Add your control notification handler code here 
mt state = m_BypassButton. GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection (state, kBypassConecry) ; 
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There a number of blocks (processing units) 
The signal flow is linear currently. 
Each item is an ascii line of text 
The file format is as follows: 

version number 



block type 

number of params for block 
block param #i 
block param #2 
block param #3 

block param #n 

block type 

number of params for block 
block param #1 
block param #2 
block param #3 

block param #n 



// file version number 
Sdefine BLOB_FILE_VERSION 1 

// block type descriptor 
typedef enum { 

BLOCK_DELAY, 

BLOCKJ3AIN, 

BLOCK_PEQ, 

BLOCK_AP, 

BLOCK_LS, 

BLOCK_HS, 

BLOCK_HP, 

BLOCK_LP, 

BLOCK_LP2 
} ProcessType; 



// SPIPEMicroComm.h: int. 
// 



• 



r e for the SPIPEMicroComm class. 



uiiiiiiiiitii/iiiiiii/iiin/iiu/iiiii/ii/i/iiumiii/iinunn/m 



#if _MSC_VER >= 1000 
jfpragma once 

ffendif // _MSC_VER >= 1000 
#include " DS PComm . h 11 

class SPIPEMicroComm : public DSPComra 
( 

int cmd_delay; 
int io_delay; 

public: 

SPIPEMicroComm () ; 

virtual -SPIPEMicroComm () ; 

virtual long SendDSPWord (long) ; 

virtual long SendDSPMemory (char *,long) ; 




INCLUDED_) 



til ! defined (AFX_SPIPEMICROCOMM_H 33F9EF06_F6EF 11D2 



006097CDB9E2 INCLUDEDJ 
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•^^feientation of the SPIPEMicroComm class^^ 
////////////////////////////////// /////////// ///////////////////////,/ 



// SPIPEMicroComm. cpp: i' 



((include "stdafx.h" 

((include "sa.h" 

((include "SPIPEMicroComm. h" 

((include "unit_ppi.h" 
#include "functs.h" 

#ifdef _DEBUG 
(fundef THIS_FILE 

static char THIS_FILE[] = FILE 

((define new DEBUG_NEW 
#endif 



// Construction/Destruction 
1 1 1 1 1 1 1 J 1 1 1 1 / 1 1 1 1 1 1 1 1 1 1 1 111/111111/ III I / 1 1 1 f I / 1 1 II 1 1 / / 1 1/ / 1 1 1 1 1 / / / J / / J 

SPIPEMicroComm: : SPIPEMicroComm ( ) * 

cmd_delay = 1000; 
io_delay = 50; 

if( load_dll()==false ) 

else 
{ 

init_port_spi (1) ; 

set_cmd_delay_cnt_value (cmd_delay) ; 
set_io_delay_cnt_value(io_delay) ; 



SPIPEMicroComm: : -SPIPEMicroComm () 



long SPIPEMicroComm: : SendDSPWord ( long value) 
return! spi_xchng24 (value) ) ; 

) 

long SPIPEMicroComm: : SendDSPMemory (char *data. long len) 
return ( 0L ) ; 
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Sif ! defined (AFX_SHELVP;^^_ SF151 624 D84D 11D2 96EE OOSOSVCDBSE^BLluDED ) 
•define AFX_SHELVPAGE_H_7?Is 1G2 4_D84D:11D2: 9 6 EE :00 6 oI7CDB9E2_:?SSeD 

Sif _MSC_VER >= 1000 
ffpragma once 

Sendif // _MSC_VER >= 1000 
// ShelvPage.h : header file 
// 

//'"sheivP^^ 
class . CTabDialog; 



class CShelvPage : public CPropertyPage 

DECLARE_DYNCREATE (CShelvPage) 

// Construction 
public : 

CShelvPage () ; 

-CShelvPage () ; 

// Dialog Data 

/ / { { AFX_DATA ( CShe IvPage ) 
enum { IDD = IDD_PP6 ) ; 
CButton m_BypassSecondButton; 
CButton m_BypassFirstButton; 
CSliderCtrl m_HiBoostSlider ; 
CSliderCtrl m_HiFreqSlider ; 
CSliderCtrl m_LoBoostSlider ; 
CSliderCtrl m_LoFreqSlider ; 
//}}AFX_DATA 



// Overrides 

// ClassWizard generate virtual function overrides 

// { {AFX_VIRTUAL (CShelvPage) 

protected: 

//"A^X_VIR?UA^ DataEXChan9e<CDataEXChan3e * PDX ' ; " ° DX/DDV SUp P° rt 

// Implementation 
protected: 

/ / Generated message map functions 

// {{AFX_MSG (CShelvPage) 

virtual BOOL OnlnitDialog ( ) ; 

afx_msg vol? OnVScroll (UINt' nSBCode, UXNT nPos, CScrollBar* pScrollBar) 

afx_msg void OnShowWindow ( BOOL bShow, UINT nStatus) • 

afx_msg void OnPaintO; 

afx_msg void OnBypassFirst ( ) ; 

afx_msg void OnBypassSecondO ; 

//)}AFX_MSG 

DECLARE_MESSAGE_MAP ( ) 

CTabDialog *m_ParentWindow ; 

void SendStringToUI (int which)'; " 



// { { AFX_INSERT_LOCATION } } 

// Microsoft Developer Studio will insert additional declarations immediately before the previous line. 
#endif // ! defined (AFX_SHELVP«SE_H_6P 1 51fi24_D84D_HD2_96EB_006097CDB9E2_IMCUJDED_) 
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// ShelvPage.cpp .- implel 
// 



tion file 




#include "stdafx.h" 

ffinclude "sa.h" 

Sinclude "ShelvPage . h" 

ffinclude "TabDialog . h" 

# include "DSP56kManager .h" 

ffifdef _DEBUG 

ffdefine new DEBUG_NEW 

ffundef THIS_FILE 

static char THIS_FILE[] = 

ffendif 



FILE 




// CShelvPage property page 

IMPLEMENT_DYNCREATE (CShelvPage , CPropertyPage) 

CShelvPage:: CShelvPage () : CPropertyPage (CShelvPage: : IDD) 

//{ {AFX_DATA_INIT(CShelvPage) 
// ) } AFX_DATA_INIT 



CShelvPage: : -CShelvPage ( ) 
} 

void CShelvPage: :DoDataExchange (CDataExchange* pDX) 

CPropertyPage: : DoDataExchange (pDX) ; 
// { {AFX_DATA_MAP (CShelvPage) 
DDX_Control (pDX, IDC_CHECK3, 
IDC_CHECK1, 
IDC_SLIDER6, 
IDC_SLIDER4, 
IDC_SLIDER3 , 
IDC SLIDER1, 



DDX_Control (pDX, 
DDX_Control (pDX, 
DDX^Control (pDX, 
DDX_Control (pDX, 
DDX_Control (pDX, 
// } ) AFX_DATA_MAP 



m _ B ypassSecondButton) 
m _ B ypassFirstButton) ,- 
m_HiBoostSlider) ; 
m_HiFreqSlider) ; 
m_LoBoostSlider) ; 
m_LoFreqSlider) ; 



BEGIN_MESSAGE_MAP (CShelvPage , CPropertyPage) 
// { { AFX_MSG_MAP ( CShe lvPage ) 
ON_WM_VSCROLL ( ) 
OtT WM_SHOWWINDOW ( ) 
ON_WM_PAINT ( ) 

ON_BN_CLICKED ( IDC_CHECK1 , OnBypassFirst ) 
ON BN_CLICKED (IDC_CHECK3 , OnBypassSecond) 
//}}AFX_MSG_MAP 
END_MESSAGE MAP ( ) 



// CShelvPage message handlers ' "H I ' 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 

BOOL CShelvPage :: OnlnitDialog ( ) 

CPropertyPage: :0nmitDialog() ; 

// TODO: Add extra initialization here 
m_LoFreqSlider . SetRange ( 0 , COHTROL_RANGE) • 

m_LoFreqSlider.SetPageSize(PG_CONTROL_AMT) ; 
m_LoBoost Slider . SetRange (0 , CONTROL_RANGE) • 

m_L0BoostSlider . SetPageSize (PG_CONTROL_AMT) ; 





— 7 ^ ^ (CONTROL_RANGE + l) /16) • 

m_HiFreqSlider . SetPageSize <PG_CONTROL_AMT) ; 

m_HiBoostSlider . SetRange (0, CONTROL_RANGE) • 

mV!! 008 !:e 1 1 -? er " SStPOS <CONTROL - RW «5E-9_DSPManager-,Get:ParamVa 1 ue (kHiShelfGain) ) 
m_HiBoostSlider.SetTicFreq< <CONTROL_RANGE + l ) /l 6 ) ■ (KHiShelfGain) ) 

m_HiBoostSlider. SetPageSize ( PG_CONTROL_AMT) ; 



m_ParentWindow = (CTabDialog .) GetParent () ->GetParent () , 

return TRUE ; // return TRUE unless you set the focus to a control 
} // EXCEPTION : OCX Property Pages should return FALSE 

void CShelvPage: :OnVScroll (UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 

C^Id^r^f/^ meS ^ 9e handler C ° de here and/or cal1 defaul t 
CSliderCtrl *slider = (CSliderCtrl *) pScrollBar • 

int which; 

CPropertyPage: :OnVScroll (nSBCode, nPos, pScrollBar); 
Sleep <50) ; 

if (slider == &m_LoFreqSlider ) 

which = kLoShelfFreq; 
else if( slider == &m_LoBoostSlider ) 

which = kLoShelfGain; 
else iff slider == &m_HiFreqSlider ) 

which = kHiShelfFreq; 
else if( slider == &m_HiBoostSlider ) 

which = kHiShelfGain; 
else 

return; 

g_DSPManager->SetParamValue (CONTROL RANGE-slider->GetPos ( ) which) • 
SendStnngToUI (which) ; .wnicnj , 



yoid CShelvPage: : SendStringToUI (int which) 

CString str; 

# 

g_DSPManager->GetStringValue (which, str) ; 
m_ParentWindow->SetStatusString(o, str) ; ' 

} 

void CShelvPage: : OnShowWindow (BOOL bShow, UINT nStatus) 
CPropertyPage: :OnShowWindow(bShow, nStatus); 
// TODO: Add your message handler code here 

} 

void CShelvPage: :OnPaint() 

CPaintDC dc(this); //device context for painting 
// TODO: Add your message handler code here 
^BooSl^r^ 

m HiFreqSlider . SetPos (CONTROL RANGF o n^PM > GetParamValue (kLoShelfGain) ) 

m_HiBoostSlider . SetPos^CONTRoE^GE Zfl^ 3 **-**"**™™™™^****); 

ect-os ^ONTROL_RANGE-g_DSPManager->GetParamValue (kHiShelfGain) ) 

m_Bvpas S FirstBut t on.Se t Check, g _ D sPManag e r->G e tByp a ssSection(kBv P a S sLoshelf),; 

2 



m Bypa S sSecondButton.^^ ck(g _ D sp M anager->GetByi>assSection(kB 

// Do not call CPropertyPage: .-OnPaintO for painting messages 

void CShelvPage: :OnBypassFirst ( ) 

// TODO: Add your control notification handler code here 
int state = m_BypassFirstButton .GetState ( ) & 0x3; 

g_DSPManager->SetBypassSection(state,)cBypassLoshelf) ; 

} 

void CShelvPage: : OnBypassSecond ( ) 

// TODO:. Add your control notification handler code here 
int state = m_BypassSecondButton .GetState ( ) & 0x3; 



g_DSPManager->SetBypassSection (state, kBypassHiShelf) ; 




//Microsoft Developer St^j^generated resource script, 
((include "resource. h" 
((define APSTUDIO_READONLY_SYMBOLS 

minimum u i/ui •mm ,,,,, umiimum iiiuimmuimmmimi 

II Generated from the TEXTINCLUDE 2 resource, 
((include "afxres.h" 

£und^T^ 

ffif ! defined (AFX_RESOURCE_DLL) || defined (AFX TARG ENU) 
ffifdef _WIN3 2 _ — 

LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US 
((pragma code_page <1252) 
ffendif //_WIN32 

ffifdef APSTUDIC_INVOKED 

iiiiiiiiimuuuiuuiiuuiuuuuuuuuuiuiuuuuiuuiuuiiuiri 

II TEXTINCLUDE 
// 



1 TEXTINCLUDE DISCARDABLE 
BEGIN 

"resource. h\0" 

END 

2 TEXTINCLUDE DISCARDABLE 
BEGIN 

"#include " "afxres . h" "\r\n" 
-\0» 

END 



3 TEXTINCLUDE DISCARDABLE 
BEGIN 

"#define _AFX_NO_SPLITTER_RESOURCES\r\n" 
"#define _AFX_NO_OLE_RESOURCES\r\n" 
"#define _AFX_NO_TRACKER_RESOURCES \ r \n " 
"((define _AFX_N0_PROPERTY RESOURCES\r\n» 
"\r\n" 

I! i L ! f efined(AFX - RES ° URCE - DLL) II defined (AFX TARG ENU) \r\n" 
"ffifdef _WIN32\r\n" ~ - 

"LANGUAGE 9, l\r\n» 

"#pragma code_page (1252) \r\n" 

"#endif\r\n" 

:;iSude" :s^. ea ^s" " n i} Ni st:z: £ ri visual c+ \ edited — 

"#endif\0" xres - rc // Standard components\r\n" 

END 

#endif // APSTUDIO INVOKED 



II 
II Icon 
II 



H ltT»Z ith l0W6St ID ValU£ Pl3Ced firSt to ensure application icon 
// remains consistent on all systems 

IDR_MAINFRAME IC0 N DISCARDABLE »res\\sa . ico" 

i//"it"muuuuuuuiuuuuuuuuuuu,i,uuuiuuuuuuiuui 

II Dialog 



# 



IDDABOUTBOX DIALOG DISCARDABLE 0, 0, 259 55 
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION I WS SYSMENU 
CAPTION "About KOJ's Amazing Town Crier" 
FONT 8, "MS Sans Serif" 
BEGIN 

IDR_MAINFRAME, IDC_STATIC. 11, 17, 21, 20 
"KOJ's Amazing Town Crier Version 1.0 
119, 8 , SS_NOPREFIX 

"Copyright (C) PMI 1999 " , IDC_STATIC, 4 0 25 119 8 

"OK" , IDOK, 220 , 7 , 32 , 14 , WS GROUP 
END - 



ICON 
LTEXT 

LTEXT 

DEFPUSHBUTTON 




IDC_STATIC,4 0, 10, 



WS_CAPTION I WS_SYSMENU 



IDD_SA_DIALOG DIALOGEX 0, 0, 229, 175 
STYLE DS_MODALFRAME | WS_POPUP | ' WS VISIBLE 
EXSTYLE WS_EX_APPWINDOW • ~ 
CAPTION "SuperAudio" 
FONT 8, "MS Sans Serif" 
BEGIN 

"OK", IDOK, 172, 7,50, 14 
"Cancel", IDCANCEL, 172,23, 50, 14 
"Poke Sequence #1" , IDC_BUTT0N1, 35, 83 , 109, 25 
"Poke Sequence #2 " , IDC_BUTT0N2 , 33 , 123 , lis, 28 



DEFPUSHBUTTON 
PUSHBUTTON 
PUSHBUTTON 
PUSHBUTTON 



IDD_D IALOG1 DIALOG DISCARDABLE 0 0 236 229 

STYLE DS_MODALFRAME | WS_POPUP | WS CAPTION I WS SYSMENU 

CAPTION "KOJ's Amazing Town Crier" ~ 

MENU IDR_MENU1 

FONT 8, "MS Sans Serif" 

BEGIN 

END 

IDD_PP1 DIALOG DISCARDABLE 0, 0, 195 127 

STYLE WS_CHILD | WS_DISABLED | WS CAPTION 

CAPTION "Test" 

FONT 8, "MS Sans Serif" 

BEGIN 

PUSHBUTTON "Send SPI Sequence #1",IDC BUTTON1 , 5 7, 36, 86 22 

PUSHBUTTON "Send SPI Sequence #2'-. IDC~BOTTOH2 55 8! 93 

END ' 



IDD_PP2 DIALOG DISCARDABLE 0, 0, 288, 146 
STYLE WS_CHILD | WS_DISABLED | WS CAPTION 
CAPTION "Main" ~ 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl«,IDC_SLIDERl,"msctls_trackbar32»,TBS AUTOTICKS I 
TBS_VERT I WS_TABSTOP,58,25,22,86 ~ 
"Pre", IDC_STATIC, 2 8, 117, 12 , 8 

"Bypass Processing" , IDC_CHECK1 , "Button" , BS AUTOCHECKBOX I 
WS_TABSTOP, 173, 57, 76, 10 _ 1 

"Sliderl" , IDC_SLIDER3 , "msctl S _trackbar32 " , TBS AUTOTICKS I 
TBS_VERT I WS_TABSTOP,27,25,22,86 ~ 
" Post " , IDC_STATIC , 57 , 117 , 15 , 8 
"Volume ",.IDC^STATIC, 19,-15; 135,118 - 

"Bypass HDCD" , IDC_CHECK2 , "Button" , BS AUTOCHECKBOX I 
WS_TABSTOP,173,74,76,10 ~ 
"Bypass HDCD Gain Scale" , IDC_CHECK3 , "Button" 
BS_AUTOCHECKBOX | WS_TABSTOP, 173 , 91, 98 10 
"Reset A11«,IDC_BUTTON1,173,31,50,14 

"Analog Input " , IDC_CHECK4 , " Button" , BS AUTOCHECKBOX I 
WS_TABSTOP,173,108,56,10 ~ 

"Sliderl", IDC_SLIDER7, "msctls_trackbar32 " , TBS AUTOTICKS I 
TBS_VERT I WS_TABSTOP,89,25,22,86 ~ 
"Analog", IDC_STATIC, 85, 117, 23, 8 

"Sliderl" IDC_SLIDER8,"msctl S ltrackbar32". TBS AUTOTICKS I 
TBS_VERT I WS_TABSTOP,119,2 5,22,86 " 1 

" Delay" , IDC_STATIC, 117,117,19,8' 



CONTROL 

LTEXT 
CONTROL 

CONTROL 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

PUSHBUTTON 
CONTROL 

CONTROL 

LTEXT 
CONTROL 

LTEXT 



END 



IDD_PP3 DIALOG DISCARDAE^Ml 0 195 127 

STYLE WS_CHILD | WS_DISAbT!E j WS CAPTION 
CAPTION "Compression" _ 
FONT 8, "MS Sans Serif" 
BEGIN 

CONTROL "J^ll Compression" , IDC_CHECK1. "Button" , BS AUTOCHECKBOX I 

WS_TABSTOP,29,24,104,10 ~ 1 

END 




, TBS 



, TBS 



IDD_PP4 DIALOG DISCARDABLE 0, 0 244 159 
STYLE WS_CHILD | WS_D I SABLED | WS_CAPTION 
CAPTION "Resonance Compensation" 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl " , IDC_SLIDER1 . "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,20,24,20,85 
"Sliderl " , IDC_SLIDER2 , "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,4 8,24,21,85 
"Sliderl", IDC_SLIDER3, "msctls_trackbar32 " TBS 
TBS_VERT | WS_TABSTOP,76,24,20,85 
"Freq. " , IDC_STATIC, 17,113, 2 0, 11 
"Q" , IDC_STATIC, 51, 113 , 8 , 11 
"Cut/Boost", IDC_STATIC, 71, 113, 33, n 
"First Notch", IDC_STATIC,11,15,98,111 
"Sliderl ", IDC_SLIDER4, "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,137,24,24, 85 
"Sliderl » , IDC_SLIDER5 , "msctls_trackbar32 » 
TBS_VERT | WS_TABSTOP,165,24,21,85 
"Sliderl", IDC_SLIDER6, "msctls_trackbar32 » 
TBS_VERT | WS_TABSTOP,193,24,22, 85 
"Freq. " , IDC_STATIC, 13 5 , 113 , 20 , 11 
"Q",IDC_STATIC,169,113,8,11 
"Cut/Boost" , IDC_STATIC, 189 , 113 , 32 , 11 
"Second Notch" , IDC_STATIC, 129, 15 , 98 111 
"Bypass", IDC_CHECK5, "Button", BS AUTOCHECKBOX I 
WS_TABSTOP,33,13S,39,10 ~ 
"Bypass", IDC_CHECK6, "Button", BS AUTOCHECKBOX I 
WS_TABSTOP, 153, 135,39,10 ~ 



CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 



AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



,TBS 



,TBS 



, TBS 



AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



END 



IDD_PP5 DIALOG DISCARDABLE 0 0 339 162 
STYLE WS_CHILD | WS_D I SABLED I WS CAPTION 
CAPTION "Standing Wave Rejection"" 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl" , IDC_SLIDER1, "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,20,24,2 0,85 
"Sliderl", IDC_SLIDER2, "msctls_trackbar3 2 " 
TBS_VERT | WS_TABSTOP,48,2 4,21,85 
"Sliderl", IDC_SLIDER3, "msctls_trackbar32 » 
TBS_VERT | WS_TABSTOP,76,24,20,85 
" Freq . « , IDC_STATIC ,17,113,20,11 
"Q" , IDC_STATIC, 51, 113, 8,11 
"Cut/Boost", IDC_STATIC, 70,113,35, 11 
"First Notch" , IDC_STATIC, 11,15,98, 111 
"Sliderl", IDC_SLIDER4, "msctls_trackbar32 » 
1 WS_TABSTOP,229,24,24, 85 
, IDC_SLIDERS., "msctls_trackbar32", 
' WS_TABSTOP,257,24,21, 85 
, IDC_SLIDER6, "msctls_trackbar32 » , 
| WS_TABSTOP,285,24,22,85 
"Freq. " , IDC_STATIC, 22 7 , 113 , 20 , 11 
" Q " , IDC_STATIC , 251, 113, 8, 11 
"Cut/Boost " , IDC_STATIC, 280, 113, 34, n 
"Second Notch" , IDC_STATIC, 221, 15, 98 , m 

"Sliderl", IDC_SLIDER8, "msctls_trackbar32" 
TBS_VERT | WS_TABSTOP.14 0,25,21,85 
"Sliderl", IDC_SLIDER9, "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP, 168,25,22,85 
"Q" , IDC_STATIC, 144, 114, 8, 11 
"Cut/Boost " , IDC_STATIC, 163 , 114 , 34 , 11 
"Boost Compensation", IDC_STATIC, 125, 15 77 



CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 



TBS_VERT 
"Sliderl" , 
TBS_VERT 
"Sliderl", 
TBS VERT 



, TBS_AUTOTICKS | 
, TBS_AUTOTICKS | 
. TBS_AUTOTICKS | 



TBS_AUTOTICKS | 
TBS_AUTOTICKS | 
TBS_AUTOTICKS I 



TBS_AUTOTICKS 
TBS_AUTOTICKS 

111 



Olli 



3 



END 



WS T, 




'lDi__UHt.'!_'iu> , "Button" 
P, 146, 137, 41, 10 



, BS_AUTOCHECKB0X 



IDD_PP6 DIALOG DISCARDABLE 0 
STYLE WS_CHILD | WS_DISABLED j 
CAPTION "Smiley-Face" 
FONT 8, "MS Sans Serif" 
BEGIN 



0, 
WS 



187, 1S2 
CAPTION 



CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 

CONTROL 



"Sliderl 
TBS_VERT 
"Sliderl 
TBS_VERT 
"Freq. ", -l 



IDC_SLIDER1, "msctl 

WS_TABSTOP, 2 0, 24 
IDC_SLIDER3, "msctl 
WSJTABSTOP ,50,24, 
, 17, 113, 20, 11 



s_trackbar3 2 " , TBS 
20,85 

s_trackbar 3 2 " , TBS 
20,85 



END 



"Cut/Boost", -1, 43, 113,34, 11 
"Lo-Shelf ", -1,11, 15, 70,111 
"Sliderl", IDC_SLIDER4, "msctl 
TBS_VERT | WS_TABSTOP, 108, 24 
"Sliderl", IDC_SLIDERS, "msctl 
TBS_VERT | WS_TABSTOP,139,24 
"Freq. ", -l, 10G, 113, 20,11 
"Cut/Boost", -1,134, 113,33,11 
"Hi-Shelf", -1,100, 15, 69, 111 
"Bypass", IDC_CHECK1, "Button" 
WS_TABSTOP, 25 , 136,37, 12 
"Bypass " , IDC_CHECK3 , "Button" 
WS_TABSTOP, 115, 136,37, 12 



s_trackbar3 2 " , TBS 

24,85 
s_trackbar32 " , TBS 

22,85 



, BS_AUTOCHECKBOX 
, BS_AUTOCHECKBOX 



AUTOTICKS 
_AUTOTICKS 

AUTOTICKS 
AUTOTICKS 



IDD_PP7 DIALOG DISCARDABLE 0, 0 242 162 
STYLE WS_CHILD | WS_DISABLED | WS CAPTION 
CAPTION "Cutoff Response" 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl" 
TBS_VERT 
"Sliderl" 
TBS VERT 



CONTROL 
CONTROL 
CONTROL 



LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 



END 



IDC_SLIDER1 , "msctls_trackbar32 " , TBS 

WS_TABSTOP,2 0,24,20,85 
IDC_SLIDER2 , "msctls_trackbar32 " , TBS 
. WS_TABSTOP,48,24,21,85 
"Sliderl", IDC_SLIDER3, "msctls trackbar32 
TBS_VERT I WS_TABSTOP, 76,24,20,85 
"Freq. ", IDC_STATIC, 17 , 113 , 20 , 11 
"Q",IDC_STATIC,51,113,8,11 
"Cut/Boost » , IDC_STATIC, 71, 113 , 33 , n 
"Low Cutoff ",IDC_STATIC,ll,15,'98,'lll 
"Sliderl", IDC_SLIDER4, "msctls trackbar32 
TBS_VERT | WS_TABSTOP,137,24,24 85 
"Sliderl •M P C_SLIDER5, "msctls trackbar32» 
TBS_VERT | WS_TABSTOP,165,24,21,85 
"Sliderl", IDC_SLIDER6, "msctls trackbar32" 
TBS_VERT | WS_TABSTOP, 193,24,22, 85 
"Freq. ", IDC_STATIC, 135, 113, 20 11 
"Q" , IDC_STATIC, 169, 113, 8, 11 
"Cut/Boost", IDC_STATIC, 189, 113, 32 11 
"High Cutoff", IDC_STATIC, 129, 15 98 111 
"Bypass" , IDC_CHECK5 , "Button" , BS AUTOCHECKBOX 
WS_TABSTOP, 39, 139, 41, 12 

"Bypass" , IDC^.CHECK6, "Button" , BS AUTOCHECKBOX 
WS_TABSTOP, 154, 139,41, 12 



,TBS 



" , TBS 



,TBS 



, TBS 



_AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



IDD_PP8 DIALOG DISCARDABLE 0 
STYLE WS_CHILD | WS_DISABLED j 
CAPTION "Cutoff Response" 
FONT 8, "MS Sans Serif" 
BEGIN 



0, 285, 164 
WS_CAPTION 



CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 



TBS^pt"; '^-f IDER1 ' " msctls -trackbar3 2",TBS_AUTOTICKS | 
TBS_VERT | WS_TABSTOP,2 0,24 20 85 

TBS i VPPT"i I ^- SLIDER2 ''' mSCtlS - traCkbar32 "' TBS AUTOTICKS | 
TBS_VERT | WS_TABSTOP, 4 8, 24 21 85 ~ 

"Freq. ",-i,i7, H3, 20, 11 

"Q", -1,51, 113, 8, 11 

"Low Cutoff », -l,n, i 5f 71>111 



4 



CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 

CONTROL 

CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



VERT I 




ICKS | 



END 



"SlicMKiDC_SLIDER4, "msctls_trackbar32 « TBS 
TBS_VERT | WS_TABSTOP, 112, 24, 24, 85 
I^f" 1 "; IDC -SLIDERS, "msctls_trackbar32» , TBS AUTOTICKS | 
TBS_VERT | WS_TABSTOP, 140, 24, 21, 85 ~ 
"Freq.», -1,110, 113,20,11 
"Q", -1,144, 113, 8, 11 
"High Cutof f " , -l, 104, 15, 69, 111 

"Bypass" , IDC_CHECK4 , "Button" , BS AUTOCHECKBOX I 
WS_TABSTOP, 2 5, 13 6,4 0, 13 

"Bypass MDC_CHECK5, "Button", BS AUTOCHECKBOX I 
WS_TABSTOP, 116, 136,40,13 ~ 

"Sliderl" lDC_SLIDER8,"msctls_trackbar32", TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,203,25,24,85 ~ 

"Sliderl" IDC_SLIDER9,"msctls_trackbar32», TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,231, 25,21, 85 ~ ^ 

"Freq. ",-1,201, 114, 20, 11 
"Q" , -1,235, 114 ,8,11 

"New High Cutoff", -1,195, 15, 69, 111 

"Bypass »,IDC_CHECK7, "Button", BS AUTOCHECKBOX I 

WS_TABSTOP, 207, 137, 40, 13 



IDD_PP9 DIALOG DISCARDABLE 0, 0 244 164 
STYLE WS_CHILD | WS_DISABLED | WS_CAPTION 
CAPTION "Resonance Compensation #2" 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl", IDC_SLIDER1, "tnsctls_trackbar32 " TBS 
TBS_VERT | WS_TABSTOP,20,24,20,85 
"Sliderl", IDC_SLIDER2, "msctls_trackbar32 ' 
TBS_VERT | WS_TABSTOP,4 8,24,21,8 5 
"Sliderl" , IDC_SLIDER3 , "msctls_6rackbar32 ' 
TBS_VERT | WS_TABSTOP,7 6,24,2 0,8 5 
"Freq. " , IDC_STATIC, 17 , 113 , 20 , 11 
"Q" - IDC_STATIC, 51, 113 ,8,11 
"Cut/Boost" , IDC_STATIC, 71, 113 , 33 , n 
"Third Notch", IDC_STATIC, 11, 15, 98, 111 
"Sliderl", IDC_SLIDER4 i "msctls_trackbar32 » 
I WS_TABSTOP,137,24,24,85 
, IDC_SLIDER5, "msctls_trackbar32 » 
I WS_TABSTOP,165,24,21,85 
, IDC_SLIDER6, "msctls_track±>ar32 " 
I WS_TABSTOP,193,24,22,85 
,IDC_STATIC,135,113,2 0,11 



CONTROL 

CONTROL 

CONTROL 

LTEXT 

LTEXT 

LTEXT 

GROUPBOX 

CONTROL 

CONTROL 

CONTROL 



LTEXT 
LTEXT 
LTEXT 
GROUPBOX 
CONTROL 

CONTROL 



TBS_VERT 
"Sliderl" 
TBS_VERT 
"Sliderl" 
TBS_VERT 
" Freq . 1 



,TBS 



, TBS 



,TBS 



,TBS 



, TBS 



_AUTOTICKS 
_AUTOTICKS 
_AUTOTICKS 



AUTOTICKS 
AUTOTICKS 
AUTOTICKS 



END 



"QMDC_STATIC,169,113,8,11 
"Cut/Boost", IDC_STATIC, 189,113,32,11 
"Fourth Notch", IDC_STATIC, 129, 15, 98 111 
"Bypass", IDC_CHECK5, "Button", BS AUTOCHECKBOX I 

WS_TABSTOP, 36, 139, 40, 12 ~ 

"Bypass » , IDC_CHECK6, "Button" , BS AUTOCHECKBOX I 

WS_TABSTOP,155,139,40,12 ~ 



IDD_DIALOG2 DIALOG DISCARDABLE 0 0 175 66 

^lON^Dia™" ' WS - P0PUP ' " 8 "^« I ^--SMENU 

FONT 8, "MS Sans Serif" 

BEGIN 

PUSHBUTTON "Cancel " , IDCANCEL, 59,34,50 14 

LTEXT "Initializing I2C. Please'ffait " , IDC STATIC, 4 3, 17 

END 



IDD_DIALOG3 DIALOG DISCARDABLE 0 0 186 132 
CA^ION^Dia^^ ' WS - P ° PUP I WS -— °N I W S -SVS M ENU 
FONT 8, "MS Sans Serif" 
BEGIN 

DEFPUSHBUTTON "OK" , IDOK, 107, 95 50 14 

CONTROL -OOMl-.IDC_RADIoi. "Button" , BS_AUTORADIOBUTTON, 23,57,36, 

CONTROL "COM2",IDC_RADI02, "Button" , BS_AUTORADIOBUTTON, 23,70,36, 
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CONTROL 
CONTROL 
LTEXT 
GROUPBOX 



RADI03, "Button", BS_AUTORADIOBUTTON 



36, 



END 
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"COM3 1 
10 

^COM4 " , IDC_RADI04 , "Button" , BS_AUTORADIOBUTTON, 23,95,36, 
^Choose COM port and reset DSP board" , IDC_STATIC, 28 , 21, 
"COM Port", rDC_STATIC, 15, 45, 68, 69 



IDD_DIALOG4 DIALOG DISCARDABLE 

STYLE DS_MODALFRAME | WS_POPUP 

CAPTION "Dialog" 

FONT 8, "MS Sans Serif" 

BEGIN 

DEF PUSHBUTTON 

PUSHBUTTON 

LTEXT 

EDITTEXT 

END 



0, 0, 186, 121 
| WS_CAPTION | WS SYSMENU 



"OK",IDOK,27,72,50,14 

"Quit App",IDC_BUTTONl,101,72,48,14 
"I2C communication error ! " , IDC_STATIC, 49, 25 79 8 
IDC_EDIT1 , 49 , 4 2 , 68 , 12 , ES_AUTOHSCROLL 



IDD_PP10 DIALOG DISCARDABLE 0, 0, 187 162 
STYLE WS_CHILD | WS_DISABLED | WS ' CAPTION 
CAPTION "Allpass" 
FONT 8, "MS Sans Serif" 
BEGIN 

"Sliderl", IDC_SLIDER1, "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,2 0,24,20, 8 5 
"Sliderl", IDC_SLIDER3, "msctls_trackbar32 " 
TBS_VERT | WS_TABSTOP,50,24,2 0, 85 
"Freq. ", -1, 17, 113, 2 0, 11 
"Q", -1,53, 113, 8, 8 
"Allpass", -1, 11, 15, 70, 111 

"Bypass" , IDC_CHECK1 , "Button" , BS_AUTOCHECKBOX 
WS_TABSTOP, 25, 136, 37 12 

END 



CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



TBS_AUTOTICKS | 
TBS_AUTOTICKS I 



IDD_PP11 DIALOG 
STYLE WS_CHILD 
CAPTION " Double - 
FONT 8, "MS Sans 
BEGIN 

CONTROL 

CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



CONTROL 

LTEXT 
LTEXT 
GROUPBOX 
CONTROL 



END 



DISCARDABLE 0, 0, 244, 159 

WS_DISABLED | WS_CAPTION 
Tuned Notch" 

Serif" 

"Sliderl", IDC_SLIDERl,»msctls trackbar32 » , TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,20,24,20,85 ~ 

"Sliderl", IDC_SLIDER2,"msctls_trackbar32", TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,48,24,21,85 ~ 
"Freq. ",-1,17, 11-3, 20, 11 
"Q", -1, 51, 113, 8, 11 
"Notch", -1,11, 15, 70, 111 

"Sliderl" IDC_SLIDER5,"msctls_trackbar32", TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,109,24,21,8S ~ 
"Sliderl", IDC_SLIDER6,«msctls trackbar32 » , TBS AUTOTICKS I 
TBS_VERT | WS_TABSTOP,137,24,22 85 
"Q", -1,113, 113, 8, 11 
"Cut/Boost ", -1, 133 , 113 , 32 , 11 
"Compensation", -l, 99, 15, 7i_ m 

-"Bypass", IDC_CHECK5, "Button", BS AUTOCHECKBOX I 
WS_TABSTOP, 73, 13 6, 3 9, 10 



#ifndef _MAC 

iiiiiii/iiiiiiHii/iiiiiiiiiiniiui//i//miiniiiifi 

II Version 
// 



/////////////////////// 



VS_VERSION_INFO VERSIONINFO 
FILEVERSION 0,7,4,0 
PRODUCTVERSION 0,7,4,0 
FILEFLAGSMASK 0x3 fL 

#ifdef DEBUG 
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#else 

FILEFLAGS OxOL 
#endif 
FILEOS 0x4L 
FILETYPE OxlL 
FILESUBTYPE OxOL 
BEGIN 

BLOCK "StringFilelnfo" 
BEGIN 

BLOCK "04 0904DO" 

BEGIN 

VALUE "CompanyName", "Pacific Microsonics Inc \0" 
VALUE "FileDescription", " Sa MFC Applicat ion\ 0 ■ 
VALUE "FxleVersion", »o, 7, 4, 0 \0» 
VALUE "InternalName", »sa\0" 

™™ „^ e ? alC °Py ri 9ht", "Copyright (C) PMI 1999 \ 0 " 
VALUE "OriginalFilename", «sa EXE\0» 
VALUE "ProductName", « sa Application^" 
VALUE "ProductVersion", »o, 7 4 o\0" 
END ' ' w 

END 

BLOCK "VarFilelnfo" 
BEGIN 

VALUE "Translation", 0x409 1200 

END 

END 

#endif // !_ma C 

</;>i<'ii'>>>"iiiiiinn, l i l j /lll , llllullll , /l/llll/lln/llimill/l/l/iii/ 

I / DESIGNINFO 
// 

#ifdef APSTUDIO_INVOKED 
GUIDELINES DESIGNINFO DISCARDABLE 
BEGIN ' 

IDD_ABOUTBOX, DIALOG 
BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 252 
TOPMARGIN, 7 
BOTTOMMARGIN, 4 8 

END 

IDD_SA_DIALOG, DIALOG 
BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, '222 
TOPMARGIN, 7 
BOTTOMMARGIN, 168 

END 

IDD_DIALOGl, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 229 

TOPMARGIN, 7 

BOTTOMMARGIN, 222 

END 

IDD_PP1, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 188 

TOPMARGIN, 7 

BOTTOMMARGIN, 120 

END 

IDD_PP2, DIALOG 
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BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 281 
TOPMARGIN > 7 
BOTTOMMARGIN, 139 

END 

IDD_PP3, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 188 
TOPMARGIN, 7 
BOTTOMMARGIN, 120 

END 

IDD_PP4 , DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 23 7 
TOPMARGIN, 7 
BOTTOMMARGIN, 152 

END 

IDD_PP5, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 332 
TOPMARGIN, 7 
BOTTOMMARGIN, 155 

END 

IDD_PPS, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 180 
TOPMARGIN, 7 
BOTTOMMARGIN, 155 



IDD_PP7, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 235 

TOPMARGIN, 7 

BOTTOMMARGIN , 15 5 

END 

IDD_PP8, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 2 78 

TOPMARGIN, 7 

BOTTOMMARGIN, 157 

END 

IDD_PP9, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 23 7 

TOPMARGIN, 7 

BOTTOMMARGIN, 157 

END 

IDD_DIALOG2, DIALOG 
BEGIN 

LEFTMARGIN, 7 

RIGHTMARGIN, 168 

TOPMARGIN, 7 

BOTTOMMARGIN, 59 

END 

IDD_DIALOG3, DIALOG 
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BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 179 
TOPMARGIN, 7 ' 
BOTTOMMARGIN, 12 

END 

IDDJ3IALOG4, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 179 
TOPMARGIN, 7 
BOTTOMMARGIN, 114 

END 

IDD_PP10, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 180 
TOPMARGIN, " 7 
BOTTOMMARGIN, 155 

END 

IDD_PP11, DIALOG 

BEGIN 

LEFTMARGIN, 7 
RIGHTMARGIN, 23 7 
TOPMARGIN, 7 
BOTTOMMARGIN, 15 2 

END 

END 

#endif // APSTUDIO_INVOKED 




////////////////////////////// 

/ / Menu 
// 



/////////////////////////////////// 



//////////// 



IDR_MENU1 MENU DISCARDABLE 
BEGIN 

POPUP "File" 
. BEGIN 

MENUITEM "Open", 
MENUITEM "Save", 
MENUITEM "Export Param File" 

END 

END 



ID_MENUITEM3 2 771 
ID_MENUITEM32 772 
I D_F I LE_EX PORTPARAMF I LE 



'//^'''''iiiii'ninn/n,,,,,,,,,,,/,,,,,!,,,,!,,,,,,,!,,,,,,,,/,,,,,!,,,,! 

II String Table 
// 

STRINGTABLE DISCARDABLE 

BEGIN 

IDS_ABOUTBOX "tAbone yrxj . „ * 

END fcAcout KOJ's Amazing Town Crier..." 

ifendif // English (U.S.) resources 

'''''''''''iiiiiiiiii,,,,, II, ,,,,,,,, ,1,1, niiunu, ,,, lUIIIIU,,,,, ,,,,,,, 

#ifndef APSTUDIO_INVOKED 

'//"'''"'"''ninin/nj,,,,,,,,,,,,,,,,,,,,,,,,,, tun,, ,,,,„/,„,,„,/, 

// Generated from the TEXTINCLUDE 3 resource. 

(Sdefine _AFX_NO_SPLITTER_RESOURCES 
#define _AFX_NO_OLE_RESOURCES 
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#def ine _AFX_NO_TRACKER ^Murces 
Sdefine _AFX_NO_PROPERTY_RESOURCES 

tfif !defined(AFX RESOURCE dt r \ II ^=<=- ^, 

fiifdef _WIN32 ~ URCE - DLL » II defined (AFX_TARG_ENU) 

LANGUAGE 9, 1 

ffpragma code_page (12 52) 
Sendif 

ffinclude "res\sa rrt« / / 

•include -afxres.rS no -^crosof C visual C ++ edited resources 

ifendif standard components 
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opt 

DEFINE 
DEFINE 



cc, cex, ere, loc, so.mu.r 



FAST ' 1 ' 

M56362 >!■ 



TABLE_COUNTER EQU 10 
RUN_COUNTER EQU 10 

INIT_COUNTER EQU 10 

org y{10) : $100 
org p(10) :$980 



> — ************.*********.*.********.***,„^„,_^ i 

^ ~ ~ ~ *********** 4 

********** 



»»****» lt«t*»„„„„ ( , t(t(() 



SECTION SUPER 
— ************************************_ t ,^„.__ t4 



HDCD detect and expand code 



include 'detect. asm' 
include ' expgain. asm' 



*****************^ 

**************** 



Adopted from Motorola sample code. 



************** 

****************** 

page 132,60 

include 'ioequ.asm' 

include 'vectors . asm' 

include 'mbiquad. asm' 

include ' mpeq.asm' 

include 'mshelv.asm' 

include 'mhipass . asm' 

include 'mlopass . asm' 

include ' allpass . asm' 
list 

CONFIGURE_SPI MACRO 



; clear I2C address 



move #0,x0 
move X0,X:M_HSAR 

M_HCKR 

bits 13=12 HFM1:0 noise filter setting (off) 
bit 1 CPOL 
bit 0 CPHA 

00 xxxx xxxx xxOl 
move #l,x0 
move #0,x0 
move X0,X:M_HCKR 

commented out code should yeild a value of 0 for M_HCKR . 
M_HCSR 

bit 13 :12 HCSR HRIE 

bit 11 HCSR HTIE 

bit 10 HCSR HBIE 

bit 9 HCSR Idle (no care) 

bit 8:7 HRQE Host-request enable (asserted if ready to receive 

bit 6 HMST Master' mode (disabled) Y receive ' 

bit 5 HFIFO FIFO control (disabled) 

bit 4 HCKFR Clock freeze (off) 

bit 3:2 HM1:0 24 bit mode 

bit 1 HI2C Enables I2C mode 

bit 0 HEN Enable port 



; xxOl OOIO OOOx 1001 
move #$1209, xO 
move X0,X:M HCSR 



; set command to known value 
move #SPITXDEF,x0 
move xO,x:spixmit 
movep x: spixmit,x:M_HTX 

ENDM 



CONFIGURE_I2C MACRO 

; turn off port 

move #0,x0 

move x0 , X : M_HCSR 

; leave address alone 
move #0,x0 

; move X0.X: M _„SAR . clear „ c address 

•Thc^ ° Ut C ° de Sh ° Uld yeild a value of 0 for M - HCKR - 
bits 13:12 HFM1:0 noise filter setting on 

11 xxxx xxxx xxOO 
move #>$3000,x0 
move xO , X : M_HCKR 

M_HCSR 

bit 13 : 12 HCSR HRIE 
bit 11 HCSR HTIE 
bit 10 HCSR HBIE 
bit 9 HCSR Idle (no care) 

bit 8-.1 HRQE Host-request enable (asserted if ready to receive) 
bit S HMST Master mode (disabled) receive) 
HFIFO FIFO control (disabled) 
HCKFR Clock freeze (off) 
2 HM1:0 24 bit mode 
H12C Enables I2C mode 
HEN Enable port 



bit 
bit 
bit 
bit 
bit 



xxOl 1100 lOlx 1010 
move #$1CAA, xO 
move X0,X:M_HCSR 

set command to known value 



move 
move 
movep 

ENDM 



#0,X0 
x0,x:spixmit 
x: spixmit,x:M HTX 



XDEF 
XREF 
XREF 
XREF 
XREF 
XREF 
XREF 

SPITXDEF 



f control, 

HDCD_DETECT_INIT, HDCD_DETECT, lsbcntl 
, ltemp, rtenip 
dcontrol 

HDCD_GAIN_INIT, HDCD_DYNAMICS 
detect 

rmodel, bitcntl 
equ $444444 



org xi : 

DRX_BUFF_BASE ds 
ARX_BUFF_BASE ds 



TX_BUFF BASE 



;RX_PTR 
TX PTR 



ds 
ds 



ds 



unprocessed followed by processed data 
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flags 
sent 
RightReceive 
SPIReceive 
SPIOverrun 
SPIFIFOFull 
SPIUnderrun 
SPITransmit 
SPIStateBit 



ds l 
ds l 

equ 
equ 
equ 
equ 
equ 
equ 
equ 



0 
1 
2 
3 
4 
5 
6 



spixrait 


ds 


1 


spirecv 


ds 


1 


shisaveAl 


ds 


1 


shisaveXO 


ds 


1 


shisaveR4 


ds 


1 


shisaveN4 


ds 


1 


NADA 


ds 


1 


left 


ds 


1 


right 


ds 


1 


fcontrol 


ds 


1 


indexData 


ds 


1 


dpleft 


ds 


1 


dpright 


ds 


1 


stack 


ds 


20 



; interleaved delay line 
; independently located 

org x(20) =$200 
DELAYLEN EQU 128 
sdelaylef t dsm DELAYLEN 

sdelayright dsm DELAYLEN 

org yi: 

YNADA ds 1 

volume ds l 

prefader ds 1 

bypass ds 1 

hdcdbp ds l 

gainscalebp ds l 

ddxcompbp ds 1 

analogin ds l 

avolurae ds 1 

bypassmask ds l 



2 . 9 mS delay 1 

left 

right 



BYPASS 
BYPASS] 
BYPASS] 
BYPASs] 
BYPASs] 

bypass] 
bypass] 
bypass] 
bypass] 
bypass] 
bypass" 
bypass 



_NOTCHl 
_NOTCH2 
_NOTCH3 
_NOTCH4 
_HIPASS 
_LOPASS 
.LOSHELV 
.HISHELV 
CONECRY 
ALLPASS 
DBNOTCH 
NLOPASS 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 8 
EQU 9 
EQU 10 
EQU 11 



0 
1 
2 
3 
4 
5 
S 
7 



delayval 



ds l 



EQ/filter declarations 
'•«.».....,„ t „,„ t , t , tt , l(tiitiii 

smiley face shelf EQ 
; left channel 
DECLARE_LSH. 1L, 1 . , -0.867 
DECLARE_HSH 2L,1., -0.867 

; right channel 
DECLARE_LSH 1R.1. ,-0.867 
DECLARE_HSH 2R,l.,-o. 867 



sonance compensation peq 



left channel 

• 95^56 




DPr^" PEQ ""^.-O-SSRSSS. 0.7265425 
DECLARE_PEQ 2L. 1 . , - 0 . 91< 0 s 

DECLARE_PEQ 6L. 1 . , - 0 . 9510565 . 0 . 7265425 
DECLARE_PEQ 7L. 1 . , - 0 . 91 , 0 . S 

; right channel 
DECLARE_PEQ 1R.1.,-0.91 0 5 
DECLARE_PEQ 2R, 1 . , - 0 . 91 ,' 0 '. 5 

DECLARE_PEQ 6R. 1 .,- o . 9510565 , 0 . 72 65425 
DECLARE_PEQ 7R, 1 . , - 0 . 91 , 0 . 5 

; standing wave rejection PEQ 
; left channel 

DECIARE_PEQ 3L, 1 .,- 0 . 99998 03 . 0 . 99373 65 
DECLARE_PEQ 4L, 1 . , - 0 . 91 , 0 . 5 
D ECIiARE_P EQ 5L, 1 . , - 0 . 91 ' 0 . 5 

; right channel 

DECLARE^PEQ 3R, 1 ., -0 . 9999803 , 0 . 9937365 
DECLARE_PEQ 4R, 1 . , -o . 91 , 0 5 
DECLARE_PEQ 5R, 1 . , -0 . 91 ,' 0 . 5 

; hi and lo pass filters 
; left 

DECLARE_HP hpleft. 0.0099733, 0.25 0 9987285 
; right 

DECLARE_HP hpright, 0 . 0099733 , 0 . 25 0 9987285 ™ " 

DECItARE_LP lprig h t,1.1921B5 6 :o.63i38a 9 : 8 l 72 4 8 i 5 i2871 \ HZ Hz 

; new lopass 
; left 

DECLARE_LP lplef t2 , 1 . , 0 . , 0 . 
; right 

DECLARE_LP lpright2 , 1 . , 0 . , 0 . 

; allpass filters 

DECLARE_AP apleft, -0.91,0 5 
DECLARE_AP apright,-0.91, o 5 



Keith new notch with 2 gain around it 

DECLARE_PEQ NT1L, 1. , -0 . 9999803 , 0 . 9937365 
DECLARE_PEQ NT2L, 1 . , -0 . 91 0 S • SyJ7365 
DECLARE_PEQ NT3L, 1 . , -0 . 91 ' 0 . 5 

DECLARE_PEQ NT1R, 1 . , - 0 . 9999803 , 0 . 9937365 
DECIARE_PEQ NT2R, 1 . , - 0 . 91 , o 5 
DECLARE_PEQ NT3R, 1 . , -0 . 91 ' 0 . 5 



************* 



START 
main 



************* ti 



********* 



org 


p.- $100 




ori 


#$03, mr 




movep 


#$05000B,X:M_ 


PCTL 


move 


#0,omr 




tnovec 


#0, sp 




movep 


#$000003, x:M 


_IPRP 


movep 


#$000007, x:M 


IPRP 


move 


#stack, r6 




move 


#-l,m6 




move 


#0,x0 




move 


x0,x:DRX_BUFF 


_BASE 


move 


x0,x:DRX_BUFF' 


_BASE+1 


move 


X0, X:ARX_BUFF~ 


_BASE 



*********** ti 



********** 



mask interrupts 



reset hardware stack pointer 
ESAI infs enabled and top Priority 
SHI (l) and ESAI (2) infs enabled 
initialize stack pointer 
linear addressing 
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:A^^^JF 



move xO,x:A^^UFF_BASE+l 

move xO , x : TX_BUFF_BASE 

move xO , x : TX_BUFF_BASE+1 

move xO , x : TX_BUFF_BASE+2 

move xO, x :TX_BUFF_BASE + 3 

clr' a 

move a, x: flags 

move a, x: sent 




; HDCD decoder initialize 

move #>l,xO 

move xO,x: f control 

move #>16,x0 

move xO,x:lsbcntl 

j sr HDCD_DETECT_INIT 

move #>l,xO 

move xO , x : dcontrol 

jsr HDCD GAIN INIT 



move # - 1 , mO 

move # - 1 , ml 

move # - 1 , m2 

move # - 1 , m3 

move # - 1 , m4 

move #-l,m5 

move #-l,m6 

move # - 1 , m7 



set up volume and bypass switches 

output volume is set to zero so that filter parameters can 
be downloaded, followed by volume being set 



move 


#>$80O0O0, xO 


move 


xO,y: volume 


move 


xO,y : pre fader 


move 


xO,y:avolume 


move 


#>$7FFFFF, xO 


move . 


xO,y:bypass 


move 


#>$0,x0 


move 


xO,y:hdcdbp 


move 


xO , y : gainscalebp 


move 


xO , y : ddxcompbp 


move 


xO j y : analogin 


move 


xO , y : bypassmask 


move 


xO,y:delayval 


move 


xO , x : indexData 


move 


#>sdelayleft,xO 


move 


xO,x:dpleft 


move 


#>sdelayright, xO 


move 


xO, x:dpright 



; initialize EQ params 
INIT_PEQ_PARAM 1L 
INIT_PEQ_PARAM 1R 
INIT_PEQ_PARAM 2L 
INIT_PEQ_PARAM 2R 
INIT_PEQ_PARAM 3L 
INIT_PEQ_PARAM 3R 
INIT_PEQ_PARAM 4L 
INIT_PEQ_PARAM 4R 
INIT_PEQ_PARAM 5L 
INIT_PEQ_PARAM 5R 
INIT_PEQ_PARAM 6L 
INIT_PEQ_PARAM 6R 
INIT_PEQ_PARAM 7L 
INIT_PEQ_PARAM 7R 

INIT_PEQ_PARAM NT1L 
INIT_PEQ_PARAM NT2L 
INIT_PEQ_PARAM NT3L 
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PARA^^TT 2 



INIT_PEQ_PARAM NT3R 

INIT_SH_PARAM 1L 

INIT_SH_PARAM 1R 

INIT_SH_PARAM 2L 

INIT_SH_PARAM 2R 

INIT_LP_PARAM ' lpleft 
INIT_LP_PARAM lpright 

INIT_LP2_PARAM lpleft2 
INIT_LP2_PARAM lpright2 

INIT_AP_PARAM apleft 
INIT_AP_PARAM apright 




hi-pass does not need initializing as all params are downloaded 



; setup serial host interface 
; ; CONFIGURE_SPI 
CONFIGURE I2C 



FST/FSR and SCId/SCKR are generated from the Pld" 
and fed to the DSP, A/D and D/A converters 



;put esai in reset state. 

IF ®DEF( 'ANALOGIN' ) = = 0 

movep #$000000, x:M_PCRC ; ML S 12/20/97 

n<°v?P #$000000. x = M_PRRC ; mls 12/20/97 



movep #$0c0200,x:M_TCCR 
; EST is input - - ■ 

; external clock source drives SCKT 
/negative FST polarity 
;data t FST clocked out on rising edge 
;2 words per frame 



~(bit22=0) 

(bit21=0) 

(bitl9=l) 
(bitl8=l) 

(bitl3 : 9=00001) 



movep #$0c0200,x:M_RCCR 
;FSR is input 

; external clock source drives SCKR 
/negative FSR polarity 
.-data s, FSR clocked in on rising edge 
;2 words per frame 

movep #$000000, x : M SAICR 



(bit22=0) 
(bit21=0) 
(bitl9=l) 
(bitl8 = 0) BAK(121997) 
(bit'13 : 9 = 00001) 
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movep 




« $ d 1 T^PFx : M_RCR 
;RX1, RXO enabled 
;RX2, RX3 disabled 
; reserved 

;MSB shifted first 
;word left-aligned 
; ne twork mode 

; 32 -bit slot length, 24 -bit word length 
; word- length frame sync 

; frame sync occurs 1 clock cycle earlier 
; reserved 

; RLIE, RIE, REIE enabled 
;bit23 RLIE 
;bit2 2 RIE 
;bit21 REDIE 
;bit20 REIE 




(bitl : 0=11) 
(bit3 :2=00) 
(bit5 :4=00) 
(bite=0) 
(bit7=0) 
(bits : 8=01) 
(bitl4 :10=11111) 
(bitl5=0) 
(bitlG=l) 
(bitl9 : 17=000) 
(bit23 :20=0101) 



raovep #$dl3d00, X:M_TCR 
TX0, TX1 enabled 
TX2, TX3, TX4 , TXS disabled 
MSB shifted first 
word left-aligned ' ' 
network mode 

32-bit slot length, 24-bit word length 
word length frame sync 

frame sync occurs 1 clock cycle earlier 
reserved 

TLIE, TIE,' TEIE enabled 
bit23 TLIE . 
bit22 TIE 
bit21 TED IE ' *^ 
bit20 TEIE 



;MLS 12/20/97 
(bit3: 0=0011) 
(bit5 : 4=00) 
<bit6=0) 
(bit7=0) 
(bit9:8=01) 
(bitl4 : 10=11111) 
(bitl5=0) 
(bitl6=0) 
(bitl9 : 17=000) 
(bit23 : 20=0101) 



movep #$0O0edb,x:M_PCRC 

. movep #$0O0edb,x:M_PRR'c 

movep #$ffffff ,X:M_RSMA 

movep #$ffffff ,X:M_RSMB 

movep #$000003, X:M_TSMA 

movep #$000003, x:M_TSMB 

movep #$000000,x:M_TXO 

movep #$000000, x:M_TXl 

movep #$000000, x:M_TX2 

movep #$000000, x:M_TX3 

bset #0,x:M_TCR 

bset #1,X:M_TCR 

bset #2,x:M_TCR 

bset #3 , x : M_TCR 

bset #2,X:M RCR 



; turn on serial host interface 
bset #0,X:M HCSR 



MLS 12/20/97 
MLS 12/20/97 

;MLS 12/20/97 
;MLS 12/2 0/97 



; zero out transmitter 0 
,-zero out transmitter 1 
,-zero out transmitter 2 
,-zero out transmitter 3 
;now enable TX0 
;now enable TX1 
;now enable TX2 
;now enable TX3 

;RE2 and TE3 must be set to enable 
;TX3 and disable RX2 



andi 



jclr 

bclr 

jclr 
move, 
move 
move 
move 



#$FC,mr 



bclr #RightReceive,X: flags 



#RightReceive,X: flags, 
#RightReceive,X: flags 
#RightReceive , X : flags , 

#>RX_BUFF_BASE, xO 

xO , x : RX_PTR 

#>TX_BUFF_BASE , xO 

X0 , x : TX_PTR 



/enable all interrupt levels 
; clear scaling bits 



jclr 
bclr 

btst 
. IF 

move 
move 

.ELSE 

move 
move 

. END I 



ffRightReceive, X: flags, * 
#RightReceive, X: flags 

#22,y:analogin 
<CC> 

X : DRX_BUFF_BASE , xO 
X : DRX_BUFF_BASE+1 , Xl 

x : ARX_BUFF_BASE , xO 
X:ARX_BUFF BASE+l,xl 




/receive left 
.•receive right 

; receive left 
; receive right 



; store unprocessed (with volume) output first 
move y:avolume,yO 
mpyr yO , xO , a 
mpyr yO,xl,b 



MM 5/20/99 Swapped channels 



tfr 
tfr 



xO, a 
xl,b 



a , x : TX_BUFF_BASE+2 

b, x:TX BUFF BASE 



; transmit left 
; transmit right 



; write input into delay line 




move 


#DELAYLEN-l,mO 




move 


#DELAYLEN- 1 , ml 




move 


X'dnle^ft- T-n 




move 


x:dpright, rl 




move 


y:delayval,yO 




move 


#>DELAYLEN,xO 




mpy 


x0,y0,a a,x : (rO) - 




move 


b,x: (rl) - 




move 


a, no 




move 


a,nl 




move 


X: (rO+nO) , a 




move 


x: (rl+nl) ,b 




move 


#-l,m0 




move 


#-l,ml 




move 


rO,x:dpleft 




move 


rl,x:dpright 




JSR 


STEREO_PROCESS 




; MM 


5/20/99 Swapped channels 




move 


b , x : TX_BUFF^_BASE+1 


/transmit left 


move 


' a , x : TX_BUFF_BASE+3 


; transmit right 


move 


#>l,x0 




move 


x: sent, a 




add 


x0,a 




move 


al,x:scnt 


don't saturate 


jmp 


LOOP 





Subroutines 
STEREO PROCESS 



move 
move 



a, x:left 

b, x: right 



,nv P L P ^n! , f, ter ^ L fr ° m left channel E< 3s to right channel EQs 
2L.2R 



COPY_SH_PARAM 
COPY SH PARAM 



COPY_ 
COPY_ 
COPY_ 
COPY_ 

copy" 

COPY_ 
COPY 



PEQ_ 
PEQ_ 
PEQ_ 
PEQ_ 

peq" 

PEQ_ 
PEQ 



PARAM 
PARAM 
PARAM 
PARAM 
PARAM 
PARAM 
PARAM 



1L, 1R 
2L, 2R 
3L, 3R 
4L, 4R 
5L, 5R 
6L, 6R 
7L, 7R 
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COPY_PEQ_PARAl^ptlL, NT1R 
COPY_PEQ_PARAM NT2L.NT2R 
COPY_PEQ_PARAM NT3 L , NT3 R 



COPY_HP_PARAM 
COPY_LP_PARAM 
COPY LP PARAM 



hpleft,hpright 
lpleft, lpright 
lpleft2, lpright2 



COPY_AP_PARAM aplef t , apright 

; HDCD processing 

jset #22,y:hdcdbp,doeq 



move 
move 
move 
move 

clr b 

move 

move 

tst 

teq 

move 



x: left, a 
x: right, b 

a, x: ltemp 

b, x: rtemp 



#>l,xO 

y:gainscalebp, a 
a 

xO,b 

bl,x:dcontrol 



jsr 



HDCD DETECT 



; destroy code 

move #>3,x0 

move x:rmpdel,a 

cmp X 0,a 

bne skip_code_dest 

move #>8,x0 

move ' x:bitcntl,a 

c mp xO , a 

Dne skip_code dest 



move 
eor 
move 
move 



x: ltemp, a 
#>$000100,a 
a, x: ltemp 
a,x:left 



skip_code dest : 



doeq: 



doeql : 



move 
move 
move 
jsr 

move 
move 
btst 

•IF 1 <CC> 

move 

move 

move 
" move 
. ELSE 

move 

move 
. ENDI 
jmp 



#-l,mO 
#-l,m4 
#4,n4 

HDCD_DYNAMICS 

x: ltemp, a 
x: rtemp, b 
#22,y:hdcdbp 

a, x:left 

b, x: right 
x: detect, xO 
xO,x: spixmit 

#0,x0 

xO, x: spixmit 
doeql 



move #0,x0 

move xO,x: spixmit 



] set 



#22 , y : bypass , dopostvol 



move 



x: left.xl 



_skiplsl 
_skiphsl 



move x: right, yl 

move y:prefader,xO 

mpyr -xO,xl,a 

mpyr -xO,yl,b 

tfr a ,b b,x:right 
; smiley face 

jset #BYPASS_LOSHELV,y:bypassmask, skiplsl 
LSH 1L 

jsec #BYPASS_HISHELV,y:bypassmask, Skiphsl 
HSH 2L 



; cut-off response 

jset #BYPASS_HIPASS,y.-bypassmask, skiphpl 
HP hpleft 

_skiphpl 

jset #BYPASS_LOPASS,y:bypassmask, skiplpl 
LP lpleft 

_skiplpl 

jset #BYPASS_NLOPASS,y : bypassmask, skiplp21 
LP lpleft2 
_skiplp21 

; resonance EQ 

jset #BYPASS_NOTCHl,y : bypassmask, skipll 
PEQ 1L 



_skipll 
_skip21 
_skip31 
_skip41 



jset #BYPASS_NOTCH2,y:bypassmask, skip21 
PEQ 2L 



jset #BYPASS_NOTCH3,y.-bypassmask, skip31 
PEQ 6L 



jset #BYPASS_NOTCH4,y:bypassmask, skip41 
PEQ.7L 



; cone -cry 

jset #BYPASS_CONECRY,y:bypassmask, skipccl 
PEQ 5L 
PEQ 3L 
PEQ 4L 

_skipccl 

; double-tuned notch 

jset #BYPASS_DBNOTCH,y:bypassmask, skipdbnl 
PEQ NT1L _ 
PEQ NT2L 
PEQ NT3L 
_skipdbnl 

; all-pass 

jset #BYPASS_ALLPASS,y:bypassmask, skipapl 
AP apleft ~ 

_skipapl 

move b,x:left 
move -- '- x:right,b 



; smiley face 

_skiplsr 



jset #BYPASS_LOSHELV,y:bypassmask, skiplsr 
LSH 1R 



jset #BYPASS_HISHELV,y:bypassmask, skiphsr 
HSH 2R 

_skiphsr 

; cut-off response 

jset #BYPASS_HIPASS,y:bypassmask,_skiphpr 
HP hpright 

_skiphpr 

j set #BYPASS_LOPASS , y :bypassmask, _skiplpr 
LP lpright 

_skiplpr 

jset #BYPASS_KLOPASS,y:bypassmask,_skiplp2r 
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_skiplr 
_skip2r 
_skip3r 
_skip4r 



LP lpright2 
_8kiplp2r 

; resonance EQ 

jsec «BYPASS_NOTCHl,y : bypassmask, skiplr 
PEQ 1R - 

jset «BYPASS_NOTCH2.y : bypassmask, skip2r 
PEQ 2R 

jset #BYPASS_NOTCH3,y:bypassmask, skip3r 
PEQ 6R - 

jset «BYPASS_NOTCH4,y:bypassmask, skip4r 
PEQ 7R 

; cone -cry 

jset 8BYPASS_CONECRY,y : bypassmask, skipccr 
PEQ 5R _ 
PEQ 3R 
PEQ 4R 

_skipccr 

; double-tuned notch 

jset SBYPASS_DBNOTCH, y : bypassmask, skipdbnr 
PEQ NT1R 
PEQ NT2R 
PEQ NT3R 
_skipdbnr 

; all-pass 

jset #BYPASS_ALLPASS,y : bypassmask, skipapr 
AP apright 

Jsjtipapr 
q move b,x : right 

<fdpostvol : 



plainvol : 

move y : volume , yO 

move x:left,xO 

move x: right, xl 

tnpyr -xO,yO,a 

nvpyr -xl,yO,b 
rts 



org xi : 




org yi; 



org p : 



a 
o 
m 
y 

--i 
m 
m 

M 

i": 

o 
M 
M 
M 
o 

Q 



; SHI interrupts 



; ' - SHI/I2G receive ISR 
ehi_rx isr 



move 


al , x : shisaveAl 




move 


xO, x: shisaveXO 




move 


r4,x:BhisaveR4 




move 


n4,x: shisaveN4 




movep 


X:M_HRX, al 




jset 


#SPIStateBit,x 


f lags,_gotData 


; got 


index 




move 


al, x: indexData 




bset 


#SPlstateBit,x: 


flags 


jmp 


_exitlnt 



; got data 
_gotData : 



move X:indexData,n4 f\ 1 Q tZ, 

move flpptrs, r4 wit/ J 
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bclr #SPIStateBit,x: flags 
movem p:(r4+n4),r4 
move al,y.(r4) 

_exitlnt: 

move x:shisaveAl,al 
move X: shisaveXO, xO 
move X:shisaveR4, r4 
move x: shisaveN4,n4 
rti 

; SHI/I2C receive overrun error 

shi_rxe_isr 

movep X:M_HCSR,x:NADA .. 
movep X:M_HRX,x:NADA 
bset #SPIOverrun,x: flags 
.bclr #SPIStateBit,x : flags 
rti 

SHI Receive FIFO Full 
shi_rxf_isr 

movep x : M_HCSR , x : NADA 

movep x : M_HRX , x : NADA 

bset #SPIFIFOFull, X: flags 

bclr #SPIStateBit,x: flags 
rti 

SHI Transmit Data 
shi txu isr „ 

- - ;SHI Transmit Underrun Error 

bset #SPIUnderrun,x: flags 

movep x : M_HCSR , x : NADA 

movep x: spixmit,x:M_HTX 

bclr #SPIstateBit,x: flags 
rti 

shi_tx_isr: 

movep x : spixmit , x : M_HTX 

bset #SPITransmit,x: flags 
rti 

;SHI Bus Error 
shi_bus_error : , 

movep x:M_HCSR,x:NADA 

bset . #SPIReceive+4,x : flags 

; reset shi 

bclr #0,x:M_HCSR 

nop 

nop 

bset #0,X:M_HCSR 

bclr #SPIStateBit,x:flags 

nop 

rti 




Subroutines 



include 'isr_dig.asm' 
Interrupt Service Routines 



esai txe isr 

~ Hnlr- u-,. : ESAI TRANSMIT ISR 

bclr #14,x:M SAISR . Read o aTQO t 

- ■ Keaa SAISR to clear transmit 

esai_tx_isr ; underrun error flag 

3 set #13,x:M_SAISR,TxLe£tSlot 

movep x:TX BUFF BASE+2 x-M TXi 

movep x^xlBUFFlBAlLI.'xiSo '' ^ ™* x <™*°* d 

movep X:TX_BUFF_BASE+3,x:M TX2 
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movep 
rti 



.B^^^I 



X : TX_BO^_BASE+3 , x : M TX3 



TxLef tSlot 



movep x : TX_BUFF_BASE . x : M_TX1 

movep X:TX_BUFF_BASE+l,x:M TXO 

movep x : TX_BUFF_BASE+1 . x : M~TX2 

movep X:TX_BUFF_BASE + l,x:M TX3 
rti — 



write unprocessed data 



esai_txls_isr 
move 
move 
move 

move 
rti 



rO,x: (rS) + 
#TX_BUFF_BASE, rO 
rO , x : TX_PTR 

X: - (rS) , rO 



ESAI TRANSMIT LAST SLOT ISR 
; Save rO to the stack 
; Reset pointer 

; Reset tx buffer pointer just in 
r case it was corrupted 
; Restore rO 



esai_rxe_isr 

bclr #7,x:M_SAISR 
overrun error flag 

esai rx isr 



; ESAI RECEIVE ISR 

; Read SAISR to clear receive 

; overrun error flag 



Dset 

bset 

movep 

movep 

rti 



#$S, x: M_SAISR, Lef tSlot 
#RightReceive,x: flags ; 
x : M_RX0 , x : ARX_BUFF_BASE+ 1 
X : M_RX1 , x : DRX_BUFF_BASE+1 



if right channel data then set flag 



LeftSlot 



movep 
movep 
rti 



x : M_RXO , x : ARX_BUFF_BASE 
X : M_RX1 , x : DRX_BUFF_BASE 



esai_rxls_isr 
move 
move 

move 
move 
rti 



rO,x.- (r6) + 
#RX_BUFF_BASE,rO 

rO,x:RX_PTR 
x: - (r6) ,r0 



ESAI RECEIVE .LAST SLOT ISR 
; Save rO to the stack 

Reset rx buffer pointer just in 
; case it was corrupted 
; Update rx buffer pointer 
; Restore rO 



variable look up table 



pptrs 




dc 


volume 


dc 


sh_gamma_lL 


dc 


sh_k_lL 


dc 


sh_gamma_2L 


dc 


sh_k_2L 


dc 


peq_gamma_lL 


dc 


peq_beta_lL 


dc 


peq_k_lL 


dc 


peq_gamma_2L 


dc 


peq_beta_2L 


dc 


peq_k_2L 


dc 


peq_gamma_3L 


dc 


peq_beta_3L 


dc 


peq_k_3L 


dc 


peq_gamma 4L 


dc 


peq_beta_4L 


dc 


Peq_k_4L 


dc 


peq_gamma 5L 


dc 


peq_beta_5L 


dc 


peq_k_5L 


dc 


pre fader 


dc 


bypass 


dc 


hp_scale_hpleft 


dc 


hp_fc_hplef t 


dc 


hp_qc_hpleft 
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dc lp_scale_lplef C 

dc lp_a2_lpl e ft 

dc lp_al_lpleft 

dc hdcdbp 

dc gainscalebp 

dc ddxcompbp 

dc peq_gairma_6L 

dc peq_beta_6L 

dc peq_k_6L 

dc peq_garama_7L 

dc peq_beta_7L 

dc peq_k_7L 

dc analogin 

dc avolume 

dc bypassmask 

dc delayval 

dc ap_gamma_aplef E 

dc ap_beta_aplef t 

dc lp_scale_lpleft2 

dc Ip_a2_lpleft2 

dc lp_al_lpleft2 

dc Ip_b2_lpleft2 

dc lp__bl_lpleft2 

dc peq_gamma_NTlL 

dc peq_beta_NTlL 

dc peq_k_NTlL 

dc peq_^garama_NT2L 

dc peq_beta_NT2L 

dc peq_k_NT2L 

dc peq_gamma_NT3L 

dc peq_beta_NT3L 

dc peq_k_NT3L 

dc YNADA 

dc YNADA 

dc YNADA 



ENDSEC 



end 



SH_SCALE_FACTOR EQU 3 

SH_SCALE_DIVIDE EQU (1«SH_SCALE FACTOR) 




k is gain 
k = 0 
0 < k < 1 
k = 1 
k > 1 



=> lo/hi pass filter 
= > cut 

=> pass-thru 
=> boost 



gamma drives critical frequency 



DECLARE_LSH MACRO 

org xi : 
sh_x_\name 
sh_y_\name 



name, k, gamma 



dc o 
dc 0 



; x(n-l) 
; y(n-l) 



org yi : 

sh_gamma_\name dc gamma 

sh_minus_one_\name dc -1.0 
sh_k_\name 
sh_i \name 



dc k/SH_SCALE_DIVIDE 
dc l./SH_SCALE DIVIDE 



ENDM 



DECLARE_HSH MACRO name, k, gamma 

DECLARE_LSH name, k, gamma 
ENDM 



COPY_SH_PARAM MACRO 



from, to 



move 
move 
move 
move 

ENDM 



y : sh_gamma_\ f rom, xO 
x0 , y : sh_gamma_\ to 
y:sh_k_\from,xO 
xO,y : sh_k_\to 



INIT_SH_PARAM MACRO 



name 



move 
move 
move 
move 
move 

ENDM 



#>(-1.0),x0 

xO , y : sh_minus_one_\name 
#> ( 1 . /SH_SCALE_DIVIDE) , xO 
xO,y:sh_k_\name 
xO,y:sh_l_\name 



input data is in xO 

input is scaled by 0.5 to prevent internal clipping in the all- 
computes all-pass: 

y(n) = - gamma * x(n) - x(n-l) - gamma * y(n-l) (lo-shelv) 
y(n) = gamma * x(n) + x(n-l) - gamma * y (n-l) (hi-shelv) 

all-pass output is scaled by gain: 

output = ((l + k)/2) * X (n) + ((l-k)/2) * y(n) 

assumes: 

mO , m4 , m5 = - 1 



pass 



hSH MACRO 



#sh_gamma_\name, r4 
Ssh_x_\name, rO 
b,xO y:(r4 



asr b 
rnd b 
move 

; compute y(n) 
mpy -X0,y0,b 
mac xl,yl,b 
macr -yO,xl,b 
; all-pass output in b 
mpy xO , yO , b 

mac -yl.yO.b 
mac xO , yO , b 

mac yi,yo,b 

; now scale output to get real result 
asl #(SH_SCALE_FACTOR) ,b b 

rnd b 



.yo 

y: (r4) +,yl 



X: (rO)+,xl 
X: (rO) -, xl 

X0.x:(r0) + y:(r4)+,y0 
now scale by gain/cut factor 



b,x : (rO) 



b,yl 
y: (r4) +,y0 



ENDM 



HSH MACRO 



name 



#sh_gamma_\name, r4 
#sh_x_\name , rO 
b,xO y:(r4 



asr b 

rnd b 
move 

; compute y(n) 

mpy xO , yo , b 

mac -xl,yl,b 

macr -yO,xl,b 
; all-pass output in b 

m Py XO , yO , b 

mac -yl,yO,b 

mac X0,y0,b 

mac yl , yO , b 

; now scale output to get real result 

asl #(SH_SCALE_FACTOR) ,b b 

rnd b 



yO 

y: (r4) +,yl 



X: (rO) +,xl 
X: (rO) -,xl ■ 

xO,x.-(ro)+ y:(r4) + ,y 0 
now scale by gain/cut factor 
b,x: (rO) - b,yl 

y: (r4) +,y0 



ENDM 
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PEQ_SCALE_FACTOR 
PEQ_SCALE_DIVIDE 



k is gain 
k = o 
0 < k < 1 
k = l 
k > l 



E^^ 




EQU (1<<PEQ_SCALE_FACT0R) 



=> notch filter 
=> cut 

=> pass -thru 
=> boost 



gamma drives critical frequency 
beta defines Q 



DECIARE_PEQ MACRO 

' org xi : 
P e( I_y_\name 

peq_x_\name 



org yi: 
peq_gamraa_\ name 
peq_beta_\name 
peq_k_\name 
peq_l_\name 
peq_v_\name 
peq_w_\name 

ENDM 



name , k , gamma , be t a 



dc 0 

dc o 

dc 0 

dc o 



dc gamma 

dc beta 

dc k/PEQ_SCALE_DIVIDE 

dc 1 . /PEQ_SCALE_DIVIDE 

dc 0 

dc 0 



COPY_PEQ_PARAM MACRO 



from, to 



move 
move 
move 
move 
move 
move 

ENDM 



y : peq_gamma_\ f rom, xO 
xO , y : peq_gamma_\ to 
. y=peq_beta_\from,xO 
X0,y : peq_beta_\to 
y:peq_k_\from,xO 
xO,y : peq_k_\to 



INI T_PEQ_PARAM MACRO 



move 
move 
move 

ENDM 



#> (1 . /PEQ_SCALE_DIVIDE) , xO 

X0,y : peq_k_\name 

xO,y : peq_l_\name 



input data is in b 

input is scaled by 0.5 to prevent, internal clipping in the all-pass 
computes all-pass: 

v(n) = gamma * y(n-l) + v /n ->\ 

,,/„> 1 ' + ym-2) - gamma * v(n-l) 

w(n) = gamma * x(n-l) + r>\ Z, ^ 

„. , . . , U1 ± ' + x(n-2) - gamma * w(n-l) 

y(n) = w(n) + beta * x(n) - beta * v(n) 

all -pass output is scaled by gain: 

putpuf- ((l + k)/2) . X (n) + ((l-k)/2) * y(n) 

assumes: 

mo , m<t , m5 = - 1 
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PEQ MACRO 



name 



asr 
move 
move 
move 
move 
move 

; compute v(n) 
mac xl,yO,a 
mac -yl,yO,a 
; compute w(n), v(n) 
mac xl , yo , b 
mac -yl,yO,b 
; compute y(n) , w(n) 
mac -xl.yO.b 
mac xO,yO,b 



#peq_y_\name, rO 
#peq_gamma^\name, r4 
#peq_v_\name, r5 
b, xO 

x: (rO) +, a 
x: (rO)+,xl 



y: (r4) +,y0 
y: (r5) +,yl 



X: (rO) +,b 
X: (rO) ,xl 
is now in a 
a,xl 

x: (rO) , a 
is now in b 
xO, x: <r0) - 

,n " a,x:(rO)- y:ir4)+ vO 

- r - >. ~ -.^ » 3 ,w« t ? - „ 

mac , -yl.yO.b ', 

« c xo.yo.b . a.x:(ro) + ^< r4 '^° 

yi.yo.b yl,x:(rO)- 
; now scale output to get real result 
asl #(PEQ_SCALE_FACTOR) b b 

rnd b ' ' 



y: (r5) -,yl 

a, y: (rS) + 
y: (r4) +,y0 

b, y : (r5) - " 
y: (r4) +,y0 



ENDM 
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LP_SCALE_FACTOR EQU 6 

LP_SGALE_DIVIDE EQU <1<<LP_SCALE_FACT0R> 



modified chamberlin lo-pa SS (both x(n) and x(n . 1)) 
q also defines gain 

input is sca i ed to avoid internal clipping 
f - 2.sin(w/2, f only valid when less than 1. 
0 < q < i 

implemented as a dirprf f~>-™ u- . " 

needs headroom for gain ^ Wlth coeffic -^s and data scaled. 



DECLARE_LP MACRO 

org xi: 
lp_w_\name 

org yi : 
lp_scale_\name 
1 P_a2_\name 
lp_al_\name 
!p_b2_\name 
1 P_bl_\name 

ENDM 



ds 



dc 
dc 



name , cal , ca2 , cb 



dc cb/16. 
dc ca2/2. 
dc cal/2 . 
0.0 
1.0/2. 



COPY_LP_PARAM MACRO 



from, to 



move 


y.-ip 


_scale_\from, xO 


move 


. x0,y 


:lp_scale_\to 


move 


y:lp_ 


_ a2 _\f rom, xO 


move 


xO, y 


lp_a2_\to 


move 


y--ip_ 


_al_\f rom, xO 


move 


X0,y 


lp_al_\to 


move 


y.-ip_ 


.b2_\from, xO 


move 


X0,y; 


1 P_ b2 ^\to 


move 


y:lp_ 


bl_\from,x0 


move 


X0,y : 


lp_bl_\to 


ENDM 







INIT_LP_PARAM MACRO 



move 


#0,x0 




move 


X0,y 


• lp_b2_ 


_\name 


move 


XO , y 


lp^.a2_ 


_\name 


move 


X0,y 


lp_al 


_\name 


move 


X0,y 


lp_bl" 


_\name 


move 


#>(1. 


/16.)~ 


xO 


move 


X0,y: 


lp_scale_\name 


ENDM 









INIT_LP2_PARAM MACRO 



move 
move 
move 
move 
move 
move 
move 



#0,x0 

X0,y : lp_a2_\name 
xO,y:lp_ai_\name 
#>0.5,x0 

X0,y : lp_b2_\name 
#>1. ,.x0 

X0,y : lp_bl_\name 



1 



move 
move 



ENDM 



#> (0.25/1' 
xO,y:lp 



icale ' 



e _\name 



assumes : 

mO , m4 , m5 = 



LP MACRO 


name 




move 


b,x0 




ori 


#8,mr 




move 


#lp_scale 


\name, r4 


move 


#lp_w \name,r0 


move 






mpy 


x0,y0,b 


X: (r0) + 


mac 


-xO ,y0,b 


X: (rO) - 


macr 


-xl,yO,b 


xl, x: (r 


mac 


*0,y0,b 


b,x: (ro 


macr 


xl,y0,b 




andi 


#$F7,mr 




asl 


#4,b,b 




ENDM 







y: (r4)+,y0 
y: (r4)+,y0 
y: (r4)+,y0 
y: (r4)+,y0 
y. (r4)+,y0 



XO = x(n) , yo = 0.5 
xO = w(n-2) , yO = a2 
xl = W(n-1) , y 0 = al 
w(n-2) = w(n-l) , y0 = 
w(n-l) = a , yo = bl 



b2 
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HP_SCALE_FACTOR EQU 6 

HP_SCALE_DIVIDE EQU U«HP_SCALE_FACTO R) 

chamberlin hi-pass (from lopass) 
q also defines gain 

input is scaled to avoid internal clipping 
f = 2*sin(w/2) f only valid when less than 1. 
0 < q < i 

implemented as a direct f n ™ k- ^ . 

needs headroom for gaS ^ coeffi "ents and data scaled. 

DECIAREHP MACRO name.-fc. qc, scale 

org xi: 
h P_s2_\name ds x 

n P_y_\name ds 1 

org yi : 

hp_scale_\ name dc ( _ 0 , 5 * sca 

np_fc_\name dc fc 

hp_qc_\name dc qc 

ENDM 

C0PV_ HP _ PARAM mCRQ ^^^^ 

move y:hp_scale_\from.xO 

move xO,y : hp_ SC ale \ to 

move y:hp_fc_\f rO m,x0 

move X0,yrhp_fc_\ t o 

move y:hp_qc_\from,xO 

move X0,y.-hp_qc_\to 

ENDM 



assumes : 

mo , m4 , mS 



HP MACRO name 

move #hp_scale_\name,r4 - - 

move #hp_s2_\name,r0 
move fa xQ 

: a = x(n) * scale ' X y=(r4) + ,y 0 . y0 = scale 

m Py -yO,xO,a x- (mi + „ n 
' ; b = s2 (n-l) ; fc X - <r0,+ ' Xl y=(r 4 ) + ,y 0 ; yo = fc 

mpyr xl, y o,b „. t*.n\ 

' * = * fc + x y ( ( n.°l; x0 y»(«) + .yi 

add xO , b 



macV ^-^T * *> - y(n-l) - qc . s2(n . 1} 



move 

. a,xO 
; b = s2 (n) = 82(n . 1} + f „ 

macr xo vn k . 1 ' 

xu -yo,b X:(rO)-,xO 



IF fflDEF('LO') 
tfr X0,b 
ELSE 

tfr a,b 

ENDIF 

asl b 



b.X: (rO) 
b,x.- (rO) 




ENDM 
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AP_SCALE_ FACTOR EQU^^ 
AP SCALE DIVIDP pn:t /i 

_ xvxde EQU (1«AP_SCALE_FACT0R) 

gamma drives critical frequency 
beta defines Q 




DECLARE_AP MACRO 

org xi: 
a P_y_\name 

ap_x_\natne 



org yi : 
ap_gamma_\name 
ap_beta_\name 
ap_v_\name 
ap_w_\name 

ENDM 



dc 
dc 
dc 
dc 



dc 
dc 



name , gamma , beta 



dc gamma 
dc beta 
0 
0 



COPY_AP_PARAM MACRO 



move 
move 
"move 
move 

ENDM 



from, to 



y .- ap_gamma_\ from, xO 
xO , y : ap_gamma_\ t o 
y.-ap_beta_\from,xO 
xO,y :a p_beta_\to 



INIT_AP_PARAM MACRO 
ENDM 



input .data is in b 

input is scaled bv o ■; »-« ~™ _ . 

by 0.5 to prevent eternal clipping in the all-pass 

computes all-pass. • 



v (n) = gamma 
w(n) 



y<a> -w<a, + beta ''xlnr^et; * 

assumes : 

m0,m4,m5 = -v 



AP MACRO 



name 



asr b 
move 
move 
move 
move 
move 

; compute v(n) 
mac xi.yo.a 
mac -yl,yO,a 
; compute w(n) , v(n) 
mac xl,yo,b 
■nac -yl,yO,b 
; compute y(n) , w(n) 
mac -Xl,y0,b 
">ac xO,yo,b ' 



# a P_y_\name,rO 
#ap_gamma_\name, r4 
#ap_v_\name , r5 
b,x0 

x= (r0)+, a 
x: (ro) +,xl 



x: (r0)+,b 
x : (r0),xl 
is now in a 
a, xl 

x : (r0),a 
is now in b 
X0,X: (ro) - 
a.x: (rO) - 



y: (r4) +, y o 
y: (r5) +,yl 



y: (r5) - , yl 

a, y: (rs) + 

y: (r4) +,y0 

b, y: (r5) - 




as l b 

rnd b x : (ro)-,a b,yl 

move a ' X: (ro) + 

yl.x: (rO) - 

ENDM 
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